Ta vadnica vas bo naučila, kako poklicati pod -postopek iz drugega pod -postopka v VBA
Zelo koristno je pisati kodo, ki jo je mogoče ponavljati in jo klicati iz več pod -postopkov v vašem projektu - lahko prihranite ogromno časa in naredite kodo VBA veliko učinkovitejšo.
Zagon podpostopa iz drugega podprocesura
Razmislite o treh spodnjih postopkih:
| 1234 | Sub TestRoutine ()RunRoutine1RunRoutine2End Sub |
| 123 | Sub RunRoutine1 ()MsgBox "Dobro jutro"End Sub |
| 123 | Sub RunRoutine2 ()MsgBox "Današnji datum je" & Format (Datum, "mm/dd/llll")End Sub |
Če zaženemo podproceduro - TestRoutine - bo poklicala RunRoutine1 in RunRoutine2 in prikazala se bosta 2 polja za sporočila.
Število pod -postopkov, ki jih lahko pokličete iz drugega pod -postopka, ni omejeno.
Uporaba izjave o klicu
Za lažje branje kode lahko uporabite tudi izjavo o klicu pred imenom postopka. Vendar pa nima vpliva na način izvajanja ali shranjevanja kode.
| 1234 | Sub TestRoutine ()Pokličite RunRoutine1Pokličite RunRoutine2End Sub |
Klic podrejenega z argumenti
Možen je tudi klic podrejenega z argumenti
| 1234 | Sub TestRoutine ()RunRoutine1 ("Melanie")RunRoutine2 ("Lep dan")End Sub |
| 123 | Sub RunRoutine1 (strName kot niz)MsgBox "Dobro jutro" & "& strNameEnd Sub |
| 123 | Sub RunRoutine2 (strMessage kot niz)MsgBox "Današnji datum je" & Format (Date, "mm/dd/yyyy") & VbCrLf & strMessageEnd Sub |
Klic podrejene osebe z imenovanimi argumenti
Če svoje argumente poimenujete, vam jih ni treba posredovati v istem vrstnem redu v podprograme.
| 123 | Sub TestRoutine ()RunRoutine1 strGreeting: = "Kako si?", StrName: = "Melanie"End Sub |
| 123 | Sub RunRoutine1 (strName kot String, strGreeting kot nizMsgBox "Dobro jutro" & "& strName & vbCrLf & strGreetingEnd Sub |
