Hallo Excel Freunde
Wer kann verbessern?
der code sollte die zeile löschen wenn der wert aus der textbox1 gefunden worden ist. leider passiert da nichts.
gruss achim h.
Dim Lrow As Long
Application.ScreenUpdating = False
With Sheets("ABNDaten")
Lrow = .Cells(Rows.Count, 3).End(xlUp).Row
For i = Lrow To 1 Step -1
If .Cells(i, 3) = Textbox1.Value Then Rows(i).Delete
Next i
End With
Application.ScreenUpdating = True