W VBA możesz wyjść z pętli For za pomocą Wyjdź dla Komenda.
1 | Wyjdź dla |
Kiedy wykonanie kodu dojdzie do Wyjdź dla, wyjdzie z pętli For i przejdzie do pierwszego wiersza po pętli.
Jeśli chcesz dowiedzieć się, jak wyjść z pętli Do, kliknij ten link: Pętla wyjścia VBA
Wyjdź z pętli for, gdy warunek zostanie spełniony
Na przykładzie zobaczysz, jak wyjść z pętli For po spełnieniu określonego warunku. Zapętlimy i zwiększymy wartość zmiennej io 1 w każdej iteracji. Jeśli chodzi o 5, chcemy wyjść z pętli i zwrócić okno komunikatu. Oto kod:
123456789 | Dim i jako liczba całkowitaDla i = 1 do 10Jeśli i = 5 WtedyWyjdź dlaZakończ, jeśliDalej jaMsgBox "Wartość to " & i |
Najpierw wprowadzamy pętlę For, jeśli wartość i jest mniejsza niż 10:
123 | Dla i = 1 do 10Dalej ja |
Następnie sprawdzamy, czy wartość i jest równa 5, używając polecenia If. Jeśli wartość wynosi 5, wychodzimy z pętli For i przechodzimy do pierwszego wiersza po pętli:
12345 | Jeśli i = 5 WtedyWyjdź dlaZakończ, jeśli |
Jeśli warunek nie jest spełniony, następująca instrukcja zwiększa i o 1 i ponownie wprowadza pętlę For:
1 | Dalej ja |
Pierwszy wiersz kodu, który zostanie wykonany po wyjściu z pętli For, to okno komunikatu o wartości i:
1 | MsgBox "Wartość to " & i |
Jeśli wykonasz ten kod w trybie debugowania, zobaczysz, że przejdzie on przez pętlę 5 razy. W 5NS iteracji, wartość zmiennej i wynosi 5, a kod jest wprowadzany w treści If. Teraz ciało pętli For zostało zakończone. Następnie wyskakuje MsgBox z wartością i:
Obraz 1. Przykład wyjścia z pętli