Run-Time Error bei Selection.AutoFilter
06.05.2019 11:31:14
Moritz
Ich habe eine Tabelle mit 3 relevanten Spalten, in der viele Zellen leer sind. Die Daten in diesen Spalten sind ein Verweis aus der Haupt-Datenquelle (Bsp. =Data!A6). Ich möchte nun allerdings nur Zeilen angezeigt bekommen, in denen mindestens in einer der 3 Spalten Text vorkommt. Also habe ich mit =Anzahl2 eine Hilfsspalte (Spalte G) gemacht, aus der ich alle "0" herausfiltere. So weit so gut.
Da das Dokument jedoch kontinuierlich erweitert wird, soll sich die Tabelle bei jeder Änderung _ von selbst aktualisieren. Dazu habe ich bisher in VBA unter dem Reiter dieser Tabelle ("Tabelle9") den folgenden Code hinterlegt.
Private Sub Worksheet_Activate()
Selection.AutoFilter Field:=7, Criteria1:=">0"
End Sub
Es funktioniert auch tadellos, allerdings bekomme ich nach einiger Zeit immer wieder den Run-Time Error 1004: Die AutoFilter-Methode des Range-Objektes konnte nicht ausgeführt werden.
Habt ihr eine Idee woran das liegen kann und wie man den Error beseitigt?