Compile error: Next without For

  • Excel

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von petaod.

    Compile error: Next without For

    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

    Visual Basic-Quellcode

    1. Sub RA()
    3. pre = 0
    5. Ende = 30
    7. For r = 1 To 65
    9. If Cells(2 + r, 3) = 0 And Cells(2 + r, 10) = "cp" Then
    10. Cells(2 + r, 13).Interior.Color = RGB(0, 255, 120)
    11. pre = Cells(2 + r, 1)
    12. Cells(2 + r, 14) = pre
    14. End If
    16. For s = 1 To Ende
    18. If Cells(2 + r, 7) > s Then
    19. Cells(2 + r, 13 + s).Interior.Color = RGB(0, 255, 120)
    20. End If
    22. Next s
    24. Next r
    26. For a = 1 To 65
    28. If Cells(2 + r, 3) = pre And Cells(2 + r, 10) = "cp" Then
    29. End If
    30. Next a
    32. End Sub

    Sehe es leider momentan auch nicht - aber zum Fehler finden würde ich zuerst den Inhalt innerhalb der Next-Schleifen entfernen und wenn dann der Fehler immer noch kommt - zuerst die "For a"-Schleifen - danach die anderen Next-Schleifen entfernen.

    Dann sollte das Problem eigentlich sichtbar werden.

    Wenn es zu keinem Fehler mehr kommt, dann die If-Abfragen langsam einzeln wieder hinzufügen

    VB.NET-Quellcode

    1. Sub RA()
    3. Ende = 30
    5. For r = 1 To 65
    8. For s = 1 To Ende
    11. Next s
    13. Next r
    15. For a = 1 To 65
    17. Next a
    19. End Sub


    Edit: Liegt das Problem evtl. gar nicht in der Sub RA - sondern in der aufrufenden übergeordneten Sub?

Facebook
Telefonspende