VBA Verifique si el filtro está encendido y apagado
Public Sub ClearFilter()
If ActiveSheet.FilterMode = True Then
ActiveSheet.ShowAllData
End If
End Sub
JOEPY RIBA