V VBA za dokončanje VSE izvedbe kode uporabite Konec ukaz.
| 1 | Konec |
Ko pride do izvedbe kode Konec, bo takoj zaključil z izvajanjem in zapustil program.
Če želite izvedeti, kako zapustiti podrejeno napako, kliknite to povezavo: VBA pri napaki zapusti podrejeno
Če želite izvedeti, kako zapustiti pod -funkcijo ali funkcijo, kliknite to povezavo: VBA Izhod iz pod -funkcije ali funkcije
Zaprite vso kodo v VBA
Na primeru boste videli, kaj se zgodi, ko uporabljamo Konec ukaz v VBA. Ustvarili smo Sub EndSub, ki ima Konec ukaz notri. Ta Sub se kliče iz Pokličite EndSub. Tukaj je koda:
| 123456789101112131415161718 | Zasebni sub EndSub ()Dim i kot celo številoZa i = 1 do 10Če je i = 5, potemMsgBox "Vrednost i je" & iKonecKonec ČeNaprej iEnd SubZasebni podklicEndSub ()Pokličite EndSubMsgBox "End Sub"End Sub |
V EndSub, najprej vnesemo For Loop, če je vrednost i manjša od 10:
| 123 | Za i = 1 do 10Naprej i |
Nato z ukazom If preverimo, ali je vrednost i enaka 5. Če je vrednost 5, vrnemo polje s sporočilom vrednosti i in uporabimo ukaz Konec.
| 1234567 | Če je i = 5, potemMsgBox "Vrednost i je" & iKonecKonec Če |
Če pogoj ni izpolnjen, se naslednji stavek poveča za 1 in znova vstopi v zanko For:
| 1 | Naprej i |
V Pokličite EndSub, najprej pokličemo Sub EndSub:
| 1 | Pokličite EndSub |
Po tem vrnemo polje Sporočilo:
| 1 | MsgBox "End Sub" |
Če zaženete Pokličite EndSub, bo najprej poklical EndSub. Če to kodo izvedete v načinu za odpravljanje napak, boste videli, da bo šla petkrat skozi zanko. V 5th ponovitev, vrednost spremenljivke i postane 5 in koda vnese v telo If. Zdaj pa MsgBox »Vrednost i je« & i se izvede in Konec potem:
Slika 1. Konec VBA
Kot lahko vidite, se izvajanje kode ustavi takoj po Konec ukaz, torej MsgBox "End Sub" se nikoli ne izvede.
