Saberexcel - o site das macros

Esta macro do Aplicativo Microsoft Excel VBA, insere um filtro na coluna A

Sub Insere_Filtro_ColA()
 Columns("A:A").Select
 Selection.AutoFilter
 Selection.AutoFilter Field:=1, Criteria1:=Valor
End Sub

Sub sbFiltro(Valor As String)
 Columns("A:A").Select
 Selection.AutoFilter
 Selection.AutoFilter Field:=1, Criteria1:=Valor
End Sub

'=sbFiltro("MeuValor")





Aprenda tudo sobre o Aplicativo Microsoft Excel VBA, sozinho, praticando com os produtos didáticos Saberexcel