Guten Tag
Ich habe in meiner Arbeitsmappe 4 Worksheets: A, B, C und D
In jedem dieser Worksheets habe ich auf einem Spaltenbereich einen Autofilter gesetzt.
Im jeweiligen gefilterten Bereich ist die Zelle entweder leer oder es steht "Ausblenden".
Gibt es nun eine Möglichkeit einen

Sub zu schreiben, der im jeweils aktiven Worksheet alles auswählt, wenn gefiltert war und der nur die Zeilen mit leerer Zeile zeigt, wenn nicht gefiltert war?
Oder muss ich wissen, wo der Autofilter im jeweiligen Worksheet steht, dass ich ihn über ein Makro ansprechen kann?
Gruss, Peter

Ich habe an so was, wie untenstehend gedacht (funktioniert nicht):
Sub SwitcherAutofilter()
If ActiveSheet.AutoFilterMode Then
If ActiveSheet.ShowAllData = True Then
ActiveSheet.AutoFilter Field:=1
Else
ActiveSheet.AutoFilter Field:=1, Criterial:="="
End If
End If
End Sub