În VBA, puteți ieși dintr-o buclă Do folosind Ieșiți Do comanda.
1 | Ieșiți Do |
Când vine executarea codului la Ieșiți Do, codul va ieși din bucla Do și va continua cu prima linie după buclă.
Dacă doriți să aflați cum să ieșiți dintr-o buclă For, faceți clic pe acest link: VBA Exit For
Ieșiți din buclă când se îndeplinește o condiție
Veți vedea în exemplul de mai jos cum să ieșiți dintr-o buclă Do când o anumită condiție este îndeplinită. Vom bucla și incrementa valoarea variabilei i cu 1 în fiecare iterație. Când vine vorba de 6, vrem să ieșim din buclă și să returnăm o casetă de mesaje. Iată codul:
1234567891011 | Dim i IntegerFaceți în timp ce eu <10i = i + 1Dacă i = 6 AtunciIeșiți DoEnd IfBuclăMsgBox „Valoarea este„ & i |
Mai întâi, intrăm în Buclă Do dacă valoarea lui i este mai mică de 10:
123 | Faceți în timp ce eu <10Buclă |
În corpul buclei, incrementăm valoarea lui i cu 1:
1 | i = i + 1 |
După aceea, verificăm dacă valoarea lui i este egală cu 6, folosind comanda If. Dacă valoarea este 6, ieșim din bucla Do și mergem la prima linie după buclă:
123 | Dacă i = 6 AtunciIeșiți DoEnd If |
Prima linie a codului care va fi executată după ieșirea din bucla Do este caseta de mesaj cu valoarea i:
1 | MsgBox „Valoarea este„ & i |
Dacă executați acest cod în Modul de depanare, veți vedea că va trece prin buclă de 6 ori. În 6a iterație, valoarea variabilei i devine 6 și codul intră în corpul If. Acum corpul buclei Do este ieșit. După aceea, ferestrele pop-up MsgBox cu valoarea i: