Lang L: none (table-of-contents)
Kuigi sellel saidil seda väga sageli ei kasutata, võite sattuda olukorda, kus soovite seda kasutada Tehke kuni silmuseni sisse Exceli VBA. Kood Do Do ja Loop vahele korratakse seni, kuni Do Do järel olev osa on tõene.
Asetage oma töölehele käsunupp ja lisage järgmised koodiridad:
Dim i As täisarv
i = 1
Tehke kuni i> 6
Lahtrid (i, 1). Väärtus = 20
i = i + 1
Loop
Tulemus, kui klõpsate lehel käsunuppu:
Selgitus: kuni i on kõrgem kui 6, paigutab Excel VBA väärtuse 20 lahtrisse rea i ja veeru 1 ristumiskohas ning sammu i võrra 1 võrra. Selle tulemusena paigutatakse väärtus 20 veergu A kuus korda (mitte seitse, sest Excel VBA peatub, kui i on 7).