У VBA можна вийти з циклу Do за допомогою Вихід До команду.
| 1 | Вихід До |
Коли відбувається виконання коду Вихід До, код вийде з циклу Do і продовжить роботу з першим рядком після циклу.
Якщо ви хочете дізнатися, як вийти з циклу For, натисніть на це посилання: VBA Вихід для
Вихід із циклу, коли умова виконується
У наведеному нижче прикладі ви побачите, як вийти з циклу Do, коли виконується певна умова. Ми будемо цикл і збільшувати значення змінної i на 1 в кожній ітерації. Коли справа доходить до 6, ми хочемо вийти з циклу та повернути вікно повідомлення. Ось код:
| 1234567891011 | Dim i як ціле числоРобіть, поки я <10i = i + 1Якщо i = 6 ТодіВихід ДоЗакінчити ЯкщоПетляMsgBox "Значення" & i |
Спочатку ми вводимо цикл Do, якщо значення i менше 10:
| 123 | Робіть, поки я <10Петля |
У тілі циклу ми збільшуємо значення i на 1:
| 1 | i = i + 1 |
Після цього ми перевіряємо, чи значення i дорівнює 6, за допомогою команди If. Якщо значення 6, ми виходимо з циклу Do і переходимо до першого рядка після циклу:
| 123 | Якщо i = 6 ТодіВихід ДоЗакінчити Якщо |
Перший рядок коду, який буде виконано після виходу з циклу Do, - це вікно повідомлення зі значенням i:
| 1 | MsgBox "Значення" & i |
Якщо ви виконаєте цей код у Режим налагодження, ви побачите, що він пройде цикл 6 разів. У 6го ітерації, значення змінної i стає 6, а код входить у тіло If. Тепер тіло циклу Do виходить. Після цього спливаючі вікна MsgBox зі значенням i:
