Autofilter zurücksetzen per Makro funktioniert nicht mehr

Hallo,

hab nen kleines Problem. Normalerweise soll der Autofilter beim Öffnen des Dokumentes zurückgesetzt werden. Das hat bis vor Weihnachten auch noch ganz gut geklappt aber von Heute auf Morgen funktioniert das ganze nicht mehr.
Hier der Code:

Private Sub Workbook_Open()

On Error Resume Next
ActiveSheet.ShowAllData
On Error GoTo 0
End Sub

Hat jemand vielleicht ne Idee?

Danke

Hallo,

welche Excel-Version? Könntest testweise die On Error Anweisungen auskommentieren. Erhälst Du dann eine Fehlermeldung?

Gruß

Hallo,

bin leider erst jetzt dazu gekommen es zu testen.
Hab Excel 2010 und bekomme die Fehlermeldung:

Laufzeitfehler’1004’: Anwendungs- oder objektdefinierter Fehler

Am Blattschutz liegt es nicht, da ich es sowohl mit als auch ohne probiert habe und den Haken bei Autofilter verwenden habe. Bin jetzt ein wenig ratlos.

Zur Ratlosigkeit kommt jetzt noch Verwirrtheit dazu. Auf einmal gings wieder, ganze 2x. Dann wars wieder kaputt :frowning:

Hallo,

Excel merkt sich die zuletzt aktive Tabelle beim Speichern. Wenn diese keinen AutoFilter enthält, kann es zu diesem Fehler kommen. Versuche mal…

Private Sub Workbook_Open()
  
  If ActiveSheet.AutoFilterMode Then
    
    ActiveSheet.ShowAllData
    
  End If
  
End Sub

Gruß

Hmm auch das funktioniert nicht. Wenn ich den Code im Debug-Mode ausführe überspringt er die Zeile ActiveSheet.ShowAllData
Ich habe irgendwie das Gefühl, dass er garnicht erkennt das der Autofilter gesetzt ist.