Kako izvesti podpostopek VBA v Excelu 2016

Vedeti morate, kako izvajati podprocedure VBA Sub v Excelu 2016. To je pomembno, ker je sub procedura brez vrednosti, razen če veste, kako jo izvesti. Mimogrede, izvajanje podprocedure pomeni isto kot zagon ali klic podprocedure. Uporabite lahko poljubno terminologijo.

VBA Sub lahko izvedete na več načinov; to je eden od razlogov, da lahko s postopki Sub naredite toliko koristnih stvari. Tukaj je izčrpen seznam načinov za izvedbo podprocedure:

• Z ukazom Run → Run Sub/UserForm (v VBE). Excel izvede postopek Sub, v katerem se nahaja kazalec. Ta ukaz menija ima dve možnosti: tipko F5 in gumb Run Sub/UserForm v standardni orodni vrstici v VBE. Te metode ne delujejo, če postopek zahteva enega ali več argumentov.

• Iz Excelovega pogovornega okna Makro. To polje odprete tako, da izberete Razvijalec → Koda → Makri ali z izbiro Pogled → Makri → Makri. Ali pa obidete trak in samo pritisnite tipko za bližnjico Alt+F8. Ko se prikaže pogovorno okno Makro, izberite želeni podpostopek in kliknite Zaženi. V tem pogovornem oknu so navedeni samo postopki, ki ne zahtevajo argumenta.

• Z uporabo bližnjice Ctrl+tipka (ali Ctrl+Shift+tipka), dodeljene podproceduri (ob predpostavki, da ste jo dodelili).

• Klik na gumb ali obliko na delovnem listu. Gumb ali oblika mora imeti dodeljen subpostopek – kar je zelo enostavno narediti.

• Iz drugega podprocedura, ki ga napišete.

• Z gumba, ki ste ga dodali v orodno vrstico za hitri dostop.

• Iz predmeta po meri, ki ste ga dodali na trak.

• Ko pride do dogodka. Ti dogodki vključujejo odpiranje delovnega zvezka, zapiranje delovnega zvezka, shranjevanje delovnega zvezka, spremembo celice, aktiviranje lista in druge stvari.

• Iz okna Immediate v VBE. Samo vnesite ime podprocedure in pritisnite Enter.

Zdaj morate v modul VBA vnesti podproceduro:

Začnite z novim delovnim zvezkom.

Pritisnite Alt+F11, da aktivirate VBE.

V oknu Projekt izberite delovni zvezek.

Izberite Vstavi → Modul, da vstavite nov modul.

V modul vnesite naslednje:

Sub ShowCubeRoot()
  Številka = InputBox (»Vnesite pozitivno število«)
  MsgBox Num ^ (1/3) & " je kockasti koren."
Končni sub