Zeilen Löschen
04.02.2015 12:50:12
Michael
Ich verzweifel hier an folgendem Script:
Sub NullwerteLoeschen()
ActiveSheet.Range("a1").AutoFilter Field:=34, Criteria1:=0
ActiveSheet.Range("a50:a150").SpecialCells(xlCellTypeVisible).EntireRow.Delete
ActiveSheet.Range("a1").AutoFilter
End Sub
Ich bekomme aber immer den Fehler
"Laufzeitfehler 1004: Anwendungs- oder objektorientierter Fehler!"
Das Script befindet sich im Tabellenblatt, nicht im Modul.
In einer neuen Datei funktioniert das ohne Probleme. Nur halt nicht in meiner.
Need help..., Danke
Anzeige