ich benötige einen Makro Code, der in Spalte A nach einem Wort sucht, diese Zeile komplett löscht + die Zeile darüber löscht.
Per Suchfunktion bin ich leider nicht fündig geworden. Kann mir jemand helfen?
Vielen Dank im Voraus!
Karin
Private Sub delRow()
Dim sb As String
sb = InputBox("Bitte Suchort eingeben", "Parameterabfrage")
Rows(Cells.Find(sb).Row - 1 & ":" & Cells.Find(sb).Row).Delete
End Sub