Hallo,
bei folgendem Code wird die For ... Next Schleife nicht erkannt. angezeigter Fehler: Next ohne for
Wo liegt mein Fehler?
zeile02 = 13
zeile1 = 6
For zeileIFD200 = 9 To 104 Step 5
If wsOverview.Cells(zeileIFD200, 13) "kleiner als" wsOverview.Cells(zeile02, 13) Then

wsAuslesenBSC_Abt.Cells(zeile1, 4) = wsOverview.Cells(zeileIFD200, 13) 'PasteSpecial Paste:=xlValues
Cells(zeile1, 4).Select
Selection.FormatConditions.Delete
Selection.Interior.ColorIndex = 3
zeile02 = zeile02 + 5
zeile1 = zeile1 + 1
Next zeileIFD200
Danke vielmals,
Eva