Fehler in Makro
15.07.2003 15:29:44
Nick
Mein Makro:
Sub LoeschTOP()
Dim x
For x = 2 To Cells(65536, 1).End(xlUp).Row
x = Cells.Find(what:="TOP").EntireRow.Delete
Next
End Sub
Funktioniert soweit, nur das am Ende immer eine Meldung kommt: "Objektvariable oder With-Blockvariable nicht festgelegt.
Eigentlich soll das Makro lediglich das Wort "TOP" in Spalte A finden und wenn dieses vorhanden ist, soll die ganze Zeile gelöscht werden.
Wo ist der Fehler?
Gruß
Nick
Anzeige