suchen und finden in spalte G
09.02.2022 08:56:32
unwissender
ich möchte gern ab der zeile 7 die spalte g durchsuchen nach dem wert "e". ist dieser vorhanden, soll die zeile gelöscht und weitergesucht werden
habe da mal etwas verfasst, was aber nur die erste gefundene zeile löscht oder einen fehler bringt
Dim intZ As Integer
Dim durchsuchen, finden As Range
With ActiveSheet
Set durchsuchen = .Range(.Cells(1, 7), .Cells(.Rows.Count, 7).End(xlUp))
End With
For Each finden In durchsuchen
If finden.Text = "e" Then
intZ = finden.Row
Exit For
End If
Next finden
Rows(intZ).Delete