| Die letzten 4 Beiträge |
| eulerscheZahl |
while i<1 macht keinen Sinn, du sollst es machen, solange i größer gleich ist also 1.
Ob die Syntax so korrekt ist, weiß ich nicht (habe kein MS Office zum Testen). Bei der verlinken Seite sieht die Syntax etwas anders aus. |
| Susi89 |
Erstmal vielen Dank für die schnelle Antwort. 
Vielleicht so:
Dim i, s As Long,
Dim a As Double
i=123456
a=2,5
s=0
Do
i=i/a
s=s+1
Loop while i<1
Sorry ich bin nicht so gut in programmieren. 
|
| eulerscheZahl |
Du brauchst eine weitere Variable, die du bei jedem Schleifendurchlauf um 1 erhöhst, also einen Schleifenzähler.
Und zum while solltest du dir nochmal die Syntax anschauen. |
| Susi89 |
Dividier-Schleife
Meine Frage:
Hallo, ich hab hier eine Aufgabe mit der ich Probleme habe.
Aufgabe: Schreiben Sie ein VBA-Programm: Teilen Sie die Zahl 123456 solange durch 2,5, bis das Ergebnis kleiner als 1 ist und geben Sie die Anzahl der Durchläufe aus sowie das Ergebnis aus.
Meine Ideen:
Dim i As Long,
Dim a As Double
i=123456
a=2,5
i=i/2,5
Loop while i<1
Ich weiß aber nicht wie ich das mit der Anzahl der Durchläufe noch machen soll. 
|
|
|
