VBA Exit For

I VBA kan du afslutte en For Loop ved hjælp af Afslut For kommando.

1 Afslut For

Når udførelsen af ​​koden kommer til Afslut For, vil den forlade en For -sløjfe og fortsætte med den første linje efter sløjfen.

Hvis du vil lære at afslutte en Do -loop, skal du klikke på dette link: VBA Exit Loop

Afslut en For Loop, når en betingelse er opfyldt

Du vil se på eksemplet, hvordan du forlader en For -loop, når en bestemt betingelse er opfyldt. Vi vil loop og øge værdien af ​​variablen i med 1 i hver iteration. Når det kommer til 5, vil vi forlade sløjfen og returnere en meddelelsesboks. Her er koden:

123456789 Dim i As IntegerFor i = 1 til 10Hvis i = 5 SåAfslut ForAfslut HvisNæste iMsgBox "Værdien er" & i

Først indtaster vi For Loop, hvis værdien af ​​i er mindre end 10:

123 For i = 1 til 10Næste i

Derefter kontrollerer vi, om værdien af ​​i er lig med 5, ved hjælp af kommandoen If. Hvis værdien er 5, forlader vi For -løkken og går til den første linje efter sløjfen:

12345 Hvis i = 5 SåAfslut ForAfslut Hvis

Hvis betingelsen ikke er opfyldt, øges følgende sætning i med 1 og indtastes i For -loop igen:

1 Næste i

Den første linje i koden, der vil blive eksekveret efter at have forladt For -løkken, er meddelelsesboksen med værdien i:

1 MsgBox "Værdien er" & i

Hvis du udfører denne kode i fejlfindingstilstanden, vil du se, at den vil gå gennem løkken 5 gange. I den 5th iteration, værdien af ​​variablen i bliver 5, og koden indtastes i If -brødteksten. Nu forlades kroppen til For -løkken. Derefter vises MsgBox pop-ups med værdien i:

Billede 1. Exit For Loop eksempel

wave wave wave wave wave