Guten Tag zusammen,
Ich bin beim schreiben meines ersten kleinen Codes auf folgendes Problem gestossen. Möchte ich mein "Programm" ausführen erscheint der Fehler: Compile error: Next without For
Ich habe mich etwas umgesehen, aber ich finde einfach nicht die Lösung. Ich wäre sehr froh wenn mir jemand der erfahrenen VBA-User hier hilft.
Vielen Dank im Vorraus! LG Anton
Ich bin beim schreiben meines ersten kleinen Codes auf folgendes Problem gestossen. Möchte ich mein "Programm" ausführen erscheint der Fehler: Compile error: Next without For
Ich habe mich etwas umgesehen, aber ich finde einfach nicht die Lösung. Ich wäre sehr froh wenn mir jemand der erfahrenen VBA-User hier hilft.
Vielen Dank im Vorraus! LG Anton
Visual Basic-Quellcode
- Sub RA()
- pre = 0
- Ende = 30
- For r = 1 To 65
- If Cells(2 + r, 3) = 0 And Cells(2 + r, 10) = "cp" Then
- Cells(2 + r, 13).Interior.Color = RGB(0, 255, 120)
- pre = Cells(2 + r, 1)
- Cells(2 + r, 14) = pre
- End If
- For s = 1 To Ende
- If Cells(2 + r, 7) > s Then
- Cells(2 + r, 13 + s).Interior.Color = RGB(0, 255, 120)
- End If
- Next s
- Next r
- For a = 1 To 65
- If Cells(2 + r, 3) = pre And Cells(2 + r, 10) = "cp" Then
- End If
- Next a
- End Sub