Saber ligar os AutoFiltros numa aplicação pode ser útil.
Veja abaixo:
Ligue o AutoFiltro do MS Excel
Use este código para ligar um AutoFiltro do Excel, caso não exista nenhum.
Sub TurnAutoFilterOn()
If Not ActiveSheet.AutoFilterMode Then
ActiveSheet.Range("A1").AutoFilter
End If
End Sub