Vo VBA môžete opustiť slučku For Loop pomocou Ukončiť pre príkaz.
1 | Ukončiť pre |
Keď príde na vykonanie kódu Ukončiť pre, opustí slučku For a bude pokračovať prvým riadkom za slučkou.
Ak sa chcete dozvedieť, ako opustiť slučku Do, kliknite na tento odkaz: Ukončovacia slučka VBA
Ukončiť slučku, ak je splnená podmienka
Na príklade uvidíte, ako opustiť slučku For, keď je splnená určitá podmienka. V každej iterácii zacyklíme a zvýšime hodnotu premennej i o 1. Pokiaľ ide o 5, chceme opustiť slučku a vrátiť okno so správou. Tu je kód:
123456789 | Dim i As IntegerPre i = 1 až 10Ak i = 5 PotomUkončiť preKoniec AkĎalej iMsgBox „Hodnota je“ & i |
Najprv zadáme For Forop, ak je hodnota i menšia ako 10:
123 | Pre i = 1 až 10Ďalej i |
Potom pomocou príkazu If skontrolujeme, či je hodnota i rovná 5. Ak je hodnota 5, opustíme slučku For a prejdeme na prvý riadok za slučkou:
12345 | Ak i = 5 PotomUkončiť preKoniec Ak |
Ak podmienka nie je splnená, nasledujúci príkaz zvýši i o 1 a znova vstúpi do cyklu For:
1 | Ďalej i |
Prvý riadok kódu, ktorý sa vykoná po opustení slučky For, je okno so správou s hodnotou i:
1 | MsgBox „Hodnota je“ & i |
Ak spustíte tento kód v režime ladenia, uvidíte, že prejde slučkou 5 krát. V 5th iterácia, hodnota premennej i sa stane 5 a kód vstúpi do tela If. Teraz je telo slučky For opustené. Potom sa zobrazia vyskakovacie okná MsgBox s hodnotou i:
Obrázok 1. Príklad Exit For Loop