Office: Autofilter ein/aus

Hallo! Ich habe 1 Arbeitsmappe und 4 Tabellenblätter in denen ich jeweils Autofilter benutze. Vor Ablauf meines Makros soll nun überprüft werden in welchen Tabellenblättern mit dem Autofilter etwas ausgewählt wurde und falls etwas ausgewählt wurde. Soll diese Auswahl wieder zurückgesetzt werden also so das nicht gefiltert ist. Hoffe einigermaßen verständlich danke im voraus!

 

Hallo!

Meinst du sowas?

Code:

Sub AutoFilterAlleAus()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.AutoFilterMode = True Then ws.AutoFilterMode = False
Next ws
End Sub

 

Ja so ungefähr, in dem Autofilter sollte nichts mehr gefilter sein. Der Autofilter selber sollte schon da sein.

 

Dann vielleicht so:

Code:

Sub AutoFilterAlleAus()
Dim ws As Worksheet
On Error Resume Next
For Each ws In ThisWorkbook.Worksheets
ws.ShowAllData
Next ws
End Sub

 

Genau so. Danke!