Podprogram Excel VBA: Kako poklicati podstrano v VBA s primerom

Kazalo:

Anonim

Kaj je podprogram v VBA?

Podrutina v VBA je del kode, ki opravlja posebno nalogo, opisano v kodi, vendar ne vrne rezultata ali vrednosti. Podprogrami se uporabljajo za razgradnjo velikih kosov kode na majhne obvladljive dele. Podprograme je mogoče večkrat priklicati od kjer koli v programu.

Recimo, da ste ustvarili uporabniški vmesnik z besedilnimi polji za sprejemanje uporabniških vnosnih podatkov. Ustvarite lahko podprogram, ki počisti vsebino besedilnih polj. V takem primeru je primerna podprogram klica VBA, ker ne želite vrniti nobenih rezultatov.

V tej vadnici VBA boste izvedeli-

  • Zakaj uporabljati podprograme
  • Pravila poimenovanja podprogramov in funkcij
  • Sintaksa podprograma VBA
  • Kako poklicati Sub v VBA

Zakaj uporabljati podprograme

  • Razdeli kodo na majhno obvladljivo kodo : povprečen računalniški program ima na tisoče in tisoče vrstic izvorne kode. To uvaja zapletenost. Podprogrami pomagajo rešiti to težavo tako, da razdelijo program na majhne obvladljive koščke kode.
  • Ponovna uporaba kode . Recimo, da imate program, ki mora dostopati do baze podatkov, skoraj vsa okna v programu bodo morala sodelovati z bazo podatkov. Namesto da za ta okna pišete ločeno kodo, lahko ustvarite funkcijo, ki obravnava vse interakcije z bazo podatkov. Nato ga lahko pokličete iz katerega koli okna.
  • Podprogrami in funkcije se samodejno dokumentirajo . Recimo, da imate funkcijo calcuLoanInterest in drugo, ki pravi connectToDatabase. Že ob pogledu na ime podprograma / funkcije bo programer lahko povedal, kaj program počne.

Pravila poimenovanja podprogramov in funkcij

Za uporabo podprogramov in funkcij obstaja vrsta pravil, ki jih je treba upoštevati.

  • Ime podprograma ali klicne funkcije VBA ne sme vsebovati presledka
  • Excel VBA Call Sub ali ime funkcije se mora začeti s črko ali podčrtajem. Ne sme se začeti s številko ali posebnim znakom
  • Podprogram ali ime funkcije ne more biti ključna beseda. Ključna beseda je beseda, ki ima v VBA poseben pomen. Besede, kot so Zasebno, Pod, Funkcija, Konec itd., So vsi primeri ključnih besed. Prevajalnik jih uporablja za določene naloge.

Sintaksa podprograma VBA

Za nadaljevanje tega primera boste morali v Excelu omogočiti zavihek za razvijalce. Če ne veste, kako omogočiti zavihek Developer, preberite vadnico o operaterjih VBA

TUKAJ v sintaksi,

Private Sub mySubRoutine(ByVal arg1 As String, ByVal arg2 As String)'do somethingEnd Sub

Razlaga sintakse

Koda

Ukrepanje
  • "Private Sub mySubRoutine (…)"
  • Tu se ključna beseda "Sub" uporablja za razglasitev podprograma z imenom "mySubRoutine" in zagon telesa podprograma.
  • Ključna beseda Private se uporablja za določitev obsega podprograma
  • "ByVal arg1 kot niz, ByVal arg2 kot niz":
  • Deklarira dva parametra imena podatkovnega tipa niza arg1 in arg2
  • "Končaj pod"
  • "End Sub" se uporablja za zaključek telesa podprograma

Naslednja podprogram sprejme ime in priimek ter ju prikaže v sporočilnem polju.

Zdaj bomo programirali in izvedli ta podproces. Poglejmo to.

Kako poklicati Sub v VBA

Spodaj je opisan korak za korakom, kako poklicati Sub v VBA:

  1. Oblikujte uporabniški vmesnik in nastavite lastnosti uporabniških kontrol.
  2. Dodajte podprogram
  3. Napišite ukazno kodo klika za ukazni gumb, ki prikliče podprogram
  4. Preizkusite aplikacijo

1. korak) Uporabniški vmesnik

Oblikujte uporabniški vmesnik, kot je prikazano na spodnji sliki

Nastavite naslednje lastnosti. Lastnosti, ki jih nastavljamo

S / N Nadzor Nepremičnina Vrednost
1. CommandButton1 Ime btnDisplayFullName
2. Napis Podprogram polnega imena

Zdaj bi moral biti vaš vmesnik videti tako

Korak 2) Dodajte podprogram

  1. Pritisnite Alt + F11, da odprete okno s kodo
  2. Dodajte naslednjo podprogram
Private Sub displayFullName(ByVal firstName As String, ByVal lastName As String)MsgBox firstName & " " & lastNameEnd Sub

TUKAJ v kodi,

Koda

Dejanja
  • "Private Sub displayFullName (…)"
  • Deklarira zasebno podprogram displayFullName, ki sprejema dva parametra niza.
  • "ByVal firstName Kot niz, ByVal lastName kot niz"
  • Deklarira dve spremenljivki parametrov firstName in lastName
  • MsgBox firstName & "" & lastName "
  • Za prikaz sporočilnega okna pokliče vgrajeno funkcijo MsgBox. Nato spremenljivki 'firstName' in 'lastName' posredujeta kot parametra.
  • Znak & & se uporablja za združitev obeh spremenljivk in dodajanje praznega presledka med njima.

Korak 3) Klicanje podprograma iz dogodka klika ukaznega gumba.

  • Z desno miškino tipko kliknite ukazni gumb, kot je prikazano na spodnji sliki. Izberite Prikaži kodo.
  • Odpre se urejevalnik kod

V urejevalnik kode dodajte naslednjo kodo za dogodek klika ukaznega gumba btnDisplayFullName.

Private Sub btnDisplayFullName_Click()displayFullName "John", "Doe"End Sub

Okno vaše kode bi moralo biti videti takole

Shranite spremembe in zaprite okno kode.

Korak 4) Testiranje kode

V orodni vrstici za razvijalce način oblikovanja izključite. Kot je prikazano spodaj.

Korak 5) Kliknite ukazni gumb "FullName Subroutine".

Dobili boste naslednje rezultate

Prenesite zgornjo kodo Excel

Povzetek:

  • Podprogram je del kode, ki izvaja določeno nalogo. Podprogram po vrnitvi ne vrne vrednosti
  • Podprogrami ponujajo ponovno uporabo kode
  • Podprogrami pomagajo razdeliti velike dele kode na majhne obvladljive kode.