VBA – Programmierung mit Excel Grundlagen

Kontrollstrukturen
werden die Anweisungen ausgeführt, solange Bedingung erfüllt ist (hier Zahlen 1 bis
1000):
Zähler = 1
Do While Zähler < 1001
Zähler = Zähler + 2
Loop
In der Form:
Do [Until Bedingung]
.
Anweisung(en)
[Exit Do]
Anweisung(en)
.
Loop [Until Bedingung]
werden die Anweisungen ausgeführt bis die Bedingung erfüllt wird:
Do Until Zähler = 1000
Zähler = Zähler + 2
Loop
➨ Die Bedingung kann sowohl am Anfang (bei DO) oder am Ende der Schleife (bei
LOOP) stehen, an beiden Stellen gleichzeitig ist sie unzulässig.
➨ Steht die Bedingung im Schleifenkopf, kann der Schleifendurchlauf schon vor dem
Eintritt in die Schleife verhindert werden.
➨ Solen die Anweisungen in der Schleife mindestens einmal durchlaufen werden, wird
die „Fußvariante“ der DO...LOOP - Anweisung benutzt:
Do
... [Anweisungen...]
Loop [{While | Until} Bedingung]
In der Anweisungsfolge:
Zähler = 2500
Do While Zähler < 1001
Zähler = Zähler + 1
Anw.Text = Zähler
Loop
werden die Anweisungen der Do - Schleife nicht ausgeführt.
In der Form:
Zähler = 2500
Do
Zähler = Zähler + 1
Anw.Text = Zähler
Loop While Zähler < 1001
werden sie einmal ausgeführt, anschließend die Bedingung geprüft und die Schleife
verlassen.
Die Anweisungsfolge:
Zähler = 80
Do
Zähler = Zähler + 1
Anw.Text = Zähler
Loop While Zähler < 301
zählt beispielsweise von 81 bis 301.
Seite 43