Z le nekaj vrsticami kode lahko preprosto zanke skozi kontrole na an Uporabniški obrazec Excel VBA. Uporabniška oblika, ki jo bomo ustvarili, izgleda tako:
Če želite ustvariti ta uporabniški obrazec, izvedite naslednje korake.
1. Odprite urejevalnik Visual Basic. Če Project Explorer ni viden, kliknite View, Project Explorer.
2. Kliknite Vstavi, Uporabniški obrazec. Če se orodjarna ne prikaže samodejno, kliknite Pogled, Orodjarna. Zaslon je treba nastaviti tako, kot je prikazano spodaj.
3. Dodajte oznako, potrditvena polja (najprej na vrhu, drugo pod prvim itd.) In ukazni gumb. Ko je to končano, mora biti rezultat skladen s sliko uporabniške oblike, prikazano prej. Na primer, ustvarite kontrolnik potrditvenega polja s klikom na CheckBox v orodjarni. Nato lahko povlečete potrditveno polje na Userform.
4. Lahko spremenite imena in napise kontrolnikov. Imena se uporabljajo v kodi Excel VBA. Napisi so tisti, ki se prikažejo na zaslonu. Dobra praksa je, da spremenite imena kontrol, vendar to ni potrebno, ker imamo v tem primeru le nekaj kontrol. Če želite spremeniti napis Userform, label, potrditvena polja in ukazni gumb, kliknite View, Properties Window in kliknite na vsak kontrolnik.
5. Če želite prikazati Userform, na svoj delovni list postavite ukazni gumb in dodajte naslednjo kodno vrstico:
Zasebni pod -ukaz Button1_Click ()
UserForm1.Show
End Sub
Zdaj smo ustvarili prvi del Userform. Čeprav že izgleda lepo, se s klikom na gumb Počisti še ne bo zgodilo nič.
6. Odprite urejevalnik Visual Basic.
7. V Raziskovalcu projektov dvokliknite UserForm1.
8. Dvokliknite gumb Počisti.
9. Dodajte naslednje kodne vrstice:
Zasebni pod -ukaz Button1_Click ()
Dim contr Kot nadzor
Za vsak kontr v UserForm 1. Nadzor
Če TypeName (contr) = "CheckBox" Potem
contr.Value = Napačno
Konec Če
Naslednji
End Sub
Pojasnilo: Excel VBA se vrti skozi vse kontrole na Userform. Funkcija TypeName se uporablja za filtriranje kontrolnikov potrditvenih polj. Če potrdite polje, Excel VBA počisti potrditveno polje. contr je tukaj naključno izbran, lahko uporabite poljubno ime. Ne pozabite se sklicevati na to ime v preostali kodi.
Rezultat, ko kliknete gumb Počisti:
