VBA -s saate Do -tsüklist väljuda, kasutades Välju Do käsk.
1 | Välju Do |
Kui koodi täitmine jõuab Välju Do, väljub kood Do -tsüklist ja jätkab esimese reaga pärast tsüklit.
Kui soovite teada saada, kuidas For -tsüklist väljuda, klõpsake seda linki: VBA Exit For
Väljuge tsüklist, kui tingimus on täidetud
Allolevas näites näete, kuidas Do -tsüklist väljuda, kui teatud tingimus on täidetud. Aheldame ja suurendame muutuja i väärtust 1 võrra igas iteratsioonis. Kui tegemist on 6 -ga, tahame tsüklist väljuda ja sõnumikasti tagasi saata. Siin on kood:
1234567891011 | Dim i As täisarvTee, kui ma olen <10i = i + 1Kui i = 6, siisVälju DoLõpp KuiLoopMsgBox "Väärtus on" & i |
Esiteks sisestame Do Loop, kui i väärtus on väiksem kui 10:
123 | Tee ajal, kui olen <10Loop |
Ahela kehas suurendame i väärtust 1 võrra:
1 | i = i + 1 |
Pärast seda kontrollime käsu If abil, kas i väärtus on 6. Kui väärtus on 6, väljume tsüklist Do ja läheme esimesele reale pärast tsüklit:
123 | Kui i = 6, siisVälju DoLõpp Kui |
Pärast Do -ahelast väljumist käivitatava koodi esimene rida on sõnumikast väärtusega i:
1 | MsgBox "Väärtus on" & i |
Kui täidate selle koodi Silumisrežiim, näete, et see läbib silmust 6 korda. 6 -sth iteratsiooni korral saab muutuja i väärtuseks 6 ja kood sisestatakse Ifi kehasse. Nüüd on Do -ahela korpus väljunud. Pärast seda ilmuvad hüpikaknad MsgBox väärtusega i: