ich habe ein makro das nach einem begriff sucht und die zeile löscht.
leider löscht das makro nicht konsequent alle gefundenen.
wer kann diesen fehler beheben?
Sub löschenBegriff()
Sheets("Sheet1").Activate
Range("E1").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Name = "Bereich"
For i = 1 To Range("Bereich").Cells.Count
wert = Range("Bereich").Cells(i)
If wert = "MV37" Then
Rows(i).Select
Selection.Delete
End If
Next i
End Sub
danke achim h.