Във VBA можете да излезете от For Loop с помощта на Излезте за команда.
| 1 | Излезте за |
Когато изпълнението на кода дойде Излезте за, той ще излезе от цикъла For и ще продължи с първия ред след цикъла.
Ако искате да научите как да излезете от Do цикъл, щракнете върху тази връзка: VBA Exit Loop
Излезте от цикъл For For, когато условие е изпълнено
В примера ще видите как да излезете от цикъл For, когато е изпълнено определено условие. Ще циклираме и увеличаваме стойността на променливата i с 1 във всяка итерация. Когато става въпрос за 5, искаме да излезем от цикъла и да върнем поле за съобщение. Ето кода:
| 123456789 | Dim i As IntegerЗа i = 1 до 10Ако i = 5, тогаваИзлезте заКрай АкоСледва iMsgBox "Стойността е" & i |
Първо, въвеждаме For Loop, ако стойността на i е по -малка от 10:
| 123 | За i = 1 до 10Следва i |
След това проверяваме дали стойността на i е равна на 5, като използваме командата If. Ако стойността е 5, излизаме от цикъла For и отиваме на първия ред след цикъла:
| 12345 | Ако i = 5, тогаваИзлезте заКрай Ако |
Ако условието не е изпълнено, следното изявление увеличава i с 1 и отново влиза в цикъла For:
| 1 | Следва i |
Първият ред на кода, който ще бъде изпълнен след излизане от цикъла For, е полето със съобщение със стойността i:
| 1 | MsgBox "Стойността е" & i |
Ако изпълните този код в режим на отстраняване на грешки, ще видите, че той ще премине през цикъла 5 пъти. В 5th итерация, стойността на променливата i става 5 и кодът влиза в тялото If. Сега тялото на цикъла For е излязло. След това изскачащите прозорци MsgBox със стойността на i:
Изображение 1. Изход Пример за цикъл
