Sub FiltraColuna_Clique() ActiveCell.Columns("J:J").EntireColumn.Select End Sub Isso aqui resolveu meu problema!

Wagner Boa tarde, Estou quase lá! Há alguma forma de adequar o código pra selecionar todos os itens contidos na co...

Fiz um botão que filtra automaticamente os dados a partir de um critério, eis aqui: Sub Botão1_Clique() Selection.AutoFilter Field:=1, Cri...

De cara eu ia sugerir a tecla de atalho pra acelerar a criação do filtro. Nem sempre funciona em todos os Excéis, mas, selecione os títulos da coluna ...