Hallo zusammen
Erstmal möchte ich sagen, dass ich ein blutiger Anfänger bin und ich hoffe nehmt mich trotzdem ernst. Kann mir jemand sagen, wie ich in vba das Makro schliessen kann? Ich habe für mich als Übung eine Schleife gemacht und möchte diese beenden, wenn die Startzahl (die dann immer grösser wird) grösser oder gleich Endzahl ist.
Der Code:
Public Sub ForSchleife()
Dim start As Integer, resultat As Long, zahlenreihe As Integer, ende As Long
start = InputBox("Bitte legen Sie die Startzahlfest", "Startzahl")
zahlenreihe = InputBox("Bitte legen Sie die Zahlenreihe fest", "Zahlenreihe")
ende = InputBox("Bitte legen Sie eine Endzahl fest", "Endzahl")
For i = start To ende
MsgBox (start)
start = start + zahlenreihe
If start >= ende Then End Sub
End If
Next
End Sub
Der Fehler liegt in der IF - Schleife. Doch wie kann ich sowas wie Goto End schreiben (obwohl man Goto vermeiden sollte.
Kann mir jemand helfen? Wär echt nett :)
Freundliche Grüsse
Shivan |