VBA programmā For Loop varat iziet, izmantojot Iziet uz komandu.
1 | Iziet uz |
Kad tiek izpildīts kods Iziet uz, tas izies no cilpas For un turpinās ar pirmo rindu pēc cilpas.
Ja vēlaties uzzināt, kā iziet no Do cilpas, noklikšķiniet uz šīs saites: VBA Exit Loop
Iziet no cilpas, ja nosacījums ir izpildīts
Piemērā redzēsit, kā iziet no cilpas For, kad ir izpildīts noteikts nosacījums. Katrā atkārtojumā mēs mainīsim mainīgā i vērtību un palielināsim to par 1. Runājot par 5, mēs vēlamies iziet no cilpas un atgriezt ziņojumu lodziņu. Šeit ir kods:
123456789 | Dim i As IntegerJa i = 1 līdz 10Ja i = 5, tadIziet uzBeigas JaTālāk iMsgBox "Vērtība ir" & i |
Pirmkārt, mēs ievadām cilpu For, ja i vērtība ir mazāka par 10:
123 | Ja i = 1 līdz 10Tālāk i |
Pēc tam mēs pārbaudām, vai i vērtība ir vienāda ar 5, izmantojot komandu If. Ja vērtība ir 5, mēs izejam no cilpas For un dodamies uz pirmo rindu pēc cilpas:
12345 | Ja i = 5, tadIziet uzBeigas Ja |
Ja nosacījums nav izpildīts, šāds paziņojums palielina i par 1 un atkal tiek ievadīts cilnē For:
1 | Tālāk i |
Pirmā koda rinda, kas tiks izpildīta pēc cilnes For iziešanas, ir ziņojumu lodziņš ar i vērtību:
1 | MsgBox "Vērtība ir" & i |
Ja izpildīsit šo kodu atkļūdošanas režīmā, jūs redzēsit, ka tas iet cauri cilpai 5 reizes. 5tūkst iterācija, mainīgā i vērtība kļūst par 5 un kods tiek ievadīts If korpusā. Tagad cilpas For korpuss ir aizvērts. Pēc tam uznirstošie logi MsgBox ar i vērtību:
Attēls 1. Exit For Loop piemērs