Zeile löschen, wenn Spalten Text enthalten

Computer: Software & Programmierung Visual Basic
#1

Guten Tag,

ich habe folgendes Problem.

Ich möchte die komplette Zeile löschen, wenn in Spalte D, F, H und J ein - oder ein + steht.
Ich bin Anfänger in VBA Programmierung und würde micht freuen wenn mir jemand helfen könnte.

Vielen Dank.

#2

Ich möchte die komplette Zeile löschen, wenn in Spalte D, F,
H und J ein - oder ein + steht.
Ich bin Anfänger in VBA Programmierung und würde micht freuen
wenn mir jemand helfen könnte.

Hallo Girl,

Sub Loesch()
Dim Zei As Long, Spa As Long, Anz As Integer
For Zei = Range(Rows.Count, "A").End(xlUp).Row To 1 Step -1
 Anz = 0
 For Spa = 4 To 10 Step 2
 If Cells(Zei, Spa) = "-" Or Cells(Zei, Spa) = "+" Then Anz = Anz + 1
 Next Spa
 If Anz = 4 Then Rows(Zei).Delete
Next Zei
End Sub

Gruß
Reinhard