Loopvariable nach Schleifenende
11.11.2020 19:50:59
Dieter
macht mir in einem größeren Projekt ernste Probleme. Unten
Codebeispiele und die jeweiligen Ergebnisse in der MsgBox:
Dim test As Double
For test = 1 To 10
Next test
MsgBox (test) Ergebnis: 11
Dim test As Double
For test = 1 To 10 Step 1
Next test
MsgBox (test) Ergebnis: 11
Dim test As Double
For test = 1 To 10 Step 2
Next test
MsgBox (test) Ergebnis: 11
Dim test As Double
For test = 1 To 10 Step 0.5
Next test
MsgBox (test) Ergebnis: 10.5
Dim test As Double
For test = 1 To 10 Step 3
Next test
MsgBox (test) Ergebnis: 13
Ich kann keine Gesetzmäßigkeit finden, um den Fehler zu kompensieren. Ähnlich scheint sich Excel zu verhalten, wenn die Schleife vorzeitig beendet wird.
Bin auf eine Erklärung neugierig und bedanke mich schon jetzt.