În VBA, puteți ieși dintr-un For Loop folosind Ieșiți pentru comanda.
1 | Ieșiți pentru |
Când vine executarea codului la Ieșiți pentru, va ieși dintr-o buclă For și va continua cu prima linie după buclă.
Dacă doriți să aflați cum să ieșiți dintr-o buclă Do, faceți clic pe acest link: VBA Exit Loop
Ieșiți dintr-un buclă când se îndeplinește o condiție
Veți vedea în exemplu cum să ieșiți dintr-o buclă For atunci când este îndeplinită o anumită condiție. Vom bucla și incrementa valoarea variabilei i cu 1 în fiecare iterație. Când vine vorba de 5, vrem să ieșim din buclă și să returnăm o casetă de mesaje. Iată codul:
123456789 | Dim i IntegerPentru i = 1 până la 10Dacă i = 5 AtunciIeșiți pentruEnd IfApoi euMsgBox „Valoarea este„ & i |
Mai întâi, introducem For Loop dacă valoarea lui i este mai mică de 10:
123 | Pentru i = 1 până la 10Apoi eu |
După aceea, verificăm dacă valoarea lui i este egală cu 5, folosind comanda If. Dacă valoarea este 5, ieșim din bucla For și mergem la prima linie după buclă:
12345 | Dacă i = 5 AtunciIeșiți pentruEnd If |
Dacă condiția nu este îndeplinită, următoarea instrucțiune crește i cu 1 și intră din nou în bucla For:
1 | Apoi eu |
Prima linie a codului care va fi executată după ieșirea din bucla For 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ă acesta va trece prin buclă de 5 ori. În 5a iterație, valoarea variabilei i devine 5 și codul intră în corpul If. Acum corpul buclei For este ieșit. După aceea, ferestrele pop-up MsgBox cu valoarea i:
Imaginea 1. Exit Exemplu pentru buclă