I VBA kan du avslutte en Do -sløyfe ved hjelp av Avslutt Do kommando.
1 | Avslutt Do |
Når kjøring av kode kommer til Avslutt Do, vil koden gå ut av Do -loopen og fortsette med den første linjen etter loop.
Hvis du vil lære å avslutte en For -sløyfe, klikker du på denne lenken: VBA Exit For
Avslutt en sløyfe når en betingelse er oppfylt
Du vil se i eksemplet nedenfor hvordan du avslutter en Do -løkke når en bestemt betingelse er oppfylt. Vi vil sløyfe og øke verdien av variabelen i med 1 i hver iterasjon. Når det gjelder 6, vil vi gå ut av løkken og returnere en meldingsboks. Her er koden:
1234567891011 | Dim i As IntegerGjør mens jeg <10i = i + 1Hvis i = 6 DaAvslutt DoSlutt omLøkkeMsgBox "Verdien er" & i |
Først angir vi Do Loop hvis verdien av i er mindre enn 10:
123 | Gjør mens jeg <10Løkke |
I sløyfekroppen øker vi verdien av i med 1:
1 | i = i + 1 |
Etter det sjekker vi om verdien av i er lik 6, ved hjelp av If -kommandoen. Hvis verdien er 6, forlater vi Do -løkken og går til første linje etter sløyfen:
123 | Hvis i = 6 DaAvslutt DoSlutt om |
Den første linjen i koden som vil bli utført etter at Do -sløyfen er avsluttet, er meldingsboksen med verdien i:
1 | MsgBox "Verdien er" & i |
Hvis du kjører denne koden i Feilsøkingsmodus, vil du se at det vil gå gjennom løkken 6 ganger. I 6th iterasjon, verdien av variabelen i blir 6 og koden kommer inn i If -kroppen. Nå er kroppen til Do -sløyfen avsluttet. Etter det kommer MsgBox popup-vinduer med verdien i: