See artikkel näitab, kuidas Excel VBA -s UserFormsis juhtelemente kasutada.
VBA -l on võimalus luua vorme, millega kasutaja saab suhelda, näiteks arve vorme või kontaktandmeid. Vorm võib sisaldada mitmesuguseid vormi juhtelemente, nagu tekstiväljad, liitkastid, loendiboksid ja käsunupud. See artikkel hõlmab kõige populaarsemaid juhtelemente, mida kasutatakse kasutajavormidel, nimelt tekstiväljad, sildid, liitkastid, loendiboksid, märkeruudud ja valikurühmad.
Sisseehitatud kasutajavormide ja Excelis kohandatud kasutajavormide loomise kohta lisateabe saamiseks klõpsake siin.
Kasutajavormi loomine
Exceli VBA -s UserFormi loomiseks peame esmalt avama VBE toimetaja.
Uue kasutajavormi sisestamiseks oma koodi valige UserForm lisamise menüüst.
Kaustas kuvatakse uus kasutajavorm Projektiuurija ja kuvatakse parempoolses koodiaknas.
Saate vormi ümber nimetada, kasutades Omadused kast. See peaks ilmuma teie all Projektiuurija.
Kui see on nii nähtav, vajutage F4 või klõpsake Vaade, Atribuutide aken.
Klõpsake nupul Nimi atribuut ja nimetage oma vorm ümber.
Nüüd saame oma vormi juhtnuppudega täita - tekstikasti juhtelement on koos siltide juhtimis- ja käsunupuga kõige populaarsem juhtelement.
Vormi täitmiseks juhtelementidega peame tööriistakasti sisse lülitama.
Aastal Menüü, valige Vaade> Tööriistakast.
Tekstikasti loomine
Vormile tekstikasti loomiseks valige tööriistakastis tekstikasti juhtelement.
Lohistage vormil hiirega lahtrit, hoides vasakut nuppu all ja vabastage seejärel hiirenupp.
Kuna see on esimene tekstikast, mille loome, saab selle nimeks TextBox1. Nagu vormi puhul, saate ka tekstiakti ümbernimetamiseks kasutada atribuutide akent.
Saame jätkata oma vormis vajalike tekstiväljade loomist ja nimetada need vastavalt vajadusele, kasutades atribuutide akna atribuuti Nimi.
Sildi juhtelemendi loomine
Sildi juhtelement ütleb meile, mida tekstivälja hoitakse. Lohistate vormi samal viisil kui tekstikasti puhul ja seejärel saate sildi juhtelementi sisestada vajaliku teksti, nt: eesnimi, nagu allpool näidatud.
Nagu tekstikastide puhul, jätkake vormis nõutava hulga loomist.
Kombikarbi juhtelemendi loomine
Liitkast (või rippmenüü) võimaldab kasutajal väärtuste loendist valida. Liitkasti loomiseks klõpsake tööriistakastil liitkastis, seejärel klõpsake ja lohistage vormikombinatsiooni.
Nimetage liitkast õigesti.
Väärtuste lisamine liitkasti
Selle väärtuste täitmiseks peame kodeerima Initsialiseerida kasutaja vormi objekti meetod.
Vormi taga oleva koodi (CBF) juurde pääsemiseks topeltklõpsake vormi või klõpsake koodivaatele lülitumiseks Project Exploreri koodinuppu.
Valige vasakpoolsest ripploendist Kasutajavorm ja seejärel parempoolses ripploendis Alusta.
Sisestage rippmenüü täitmiseks alam- ja lõpualamisse järgmine kood:
| 1234 | Me.cboState.AddItem "Alabama"Me.cboState.AddItem "Alaska"Me.cboState.AddItem "Arizona"Me.cboState.AddItem "Arkansas" |
Loomulikult võime nimekirja jätkata ülejäänud USA osariikidega!
Kasutajavormi käivitamiseks, et näha loendit toimides, 1) lülituge tagasi vormivaatele ja 2) klõpsake tööriistaribal nuppu Jookse nuppu.
Loendi vaatamiseks klõpsake rippmenüü noolt.
Liitkasti täitmiseks saame Excelis kasutada ka vahemikku.
| 123456 | Privaatne alamkasutajaForm_Initialize ()Dim rng As RangeIga vahemiku kohta ("A1: A50")Me.cboState.AddItem rng.ValueJärgmine rngEnd Sub |
See võtab kokku kõik vahemikku A1 kuni A50 salvestatud väärtused ja täidab vastavalt ripploendi.
Loendiboksi juhtelemendi loomine
Loendiboksi juhtelement töötab samamoodi nagu liitkasti juhtelement, kuid võimaldab meil näha kõiki vormi valikuid loendivormingus.
Valige tööriistakastis loendiboksi juhtelement ja lohistage seejärel vormile loendiboks.
Kas olete väsinud VBA koodinäidete otsimisest? Proovige AutoMacrot!
Väärtuste lisamine loendiboksi
Tippige vormi sündmuse Initsialiseerimine järgmine kood:
| 123456 | Privaatne alamkasutajaForm_Initialize ()Dim rng As RangeIga vahemiku kohta ("A1: A50")Me.lstState.AddItem rng.ValueJärgmine rngEnd Sub |
Vormi käivitamisel kuvatakse loendikast, nagu on näidatud alloleval pildil:
Märkekasti juhtelemendi loomine
Märkeruudud võimaldavad kasutajal valikut märkida või selle tühistada.
Valige märkeruutude juhtelement ja seejärel klõpsake vormil, kuhu soovite selle suunata.
Muutke atribuutide aknas märkeruutu pealdist ja nime.
Valikurühma juhtelemendi loomine valikunuppudega
Valikurühm võimaldab kasutajal valida paljude saadaolevate valikute hulgast. Suvandirühma loomise esimene samm on lisada vormile kaadrikontroll ja seejärel lisada lisatud raami sisse valikunupud. Seda tehes tagame, et vormi käivitamisel saab korraga valida ainult ühe kaadris oleva valikunupu.
Valige tööriistakastis raami juhtelement ja lohistage seejärel vormile raam.
Valige tööriistakastis suvand Valikunupp ja seejärel klõpsake suvandi lisamiseks raami lisamiseks ülaltoodud raami. Korrake vastavalt vajadusele.
Klõpsake raami ja 1) muutke raami nime ja pealdist. Seejärel 2) klõpsake iga valiku nuppu ja muutke pealdist.
Vormist väljumiseks käsunupu loomine
Praeguses etapis on vormi sulgemiseks ainus võimalus kasutada vormi juhtimisriba paremas nurgas asuvat sulgemisnuppu. Tõhusam viis vormist väljumiseks ja see, mille üle meil on suurem kontroll, on vormil nupu Exit loomine. Seda tehakse tööriistakasti käsunuppude abil.
Valige käsunupu juhtelement ja seejärel klõpsake nupu loomiseks oma vormil ja lohistage seda.
Kasutades pealdise atribuuti, muutke käsunupu pealkirjaks OK ja kiirendajaks „O”
Kiirendi eesmärk on, et kasutaja saaks antud juhul nupu aktiveerimiseks kasutada klaviatuuri Alt+O aktiveeriks nupu.
Suurepärane toode. AutoMacro mitte ainult ei kirjuta teie koodi, vaid õpetab, kui lähete! " - Tony, Suurbritannia
LisateaveLugege meie 900+ arvustust
Koodi lisamine käsunupule
Selleks, et käsunupp toimiks, peame selle taha koodi lisama, et nupule klõpsates kood töötaks. Seda nimetatakse nupu klõpsamise sündmuseks.
Klikisündmusele pääsemiseks topeltklõpsake vormi kujundusvaates nuppu.
1) Klikisündmus luuakse automaatselt, kuna seda sündmust kasutatakse kõige sagedamini käsunuppude jaoks.
2) Kui me klõpsame paremal pool rippmenüüs Protseduur, näeme kõigi käsunupu jaoks saadaolevate sündmuste meetodite loendit. See loend muutub sõltuvalt sellest, millist tüüpi juhtelemente oleme loonud, kuna erinevat tüüpi juhtelementide jaoks on saadaval erinevad sündmused.
Sisestage järgmine kood käsunupu klõpsamisüritusele.
| 123456789101112131415 | Privaatne alam cmdOK_Click ()Vahemik ("E1") = Me.txtEesnimiVahemik ("E2") = Me.txtPerekonnanimiVahemik ("E3") = Me.txtCellPhoneVahemik ("E4") = Me.cboStateKui Me.ckContactInfo = Tõsi siisVahemik ("E5") = "SMS on lubatud"MuiduVahemik ("E5") = "SMS pole lubatud"Lõpp KuiKui Me.opt1.Value = True Siis vahemik ("E6") = Me.opt1.CaptionKui Me.opt2.Value = True Siis vahemik ("E6") = Me.opt2.CaptionKui Me.opt3.Value = True Siis vahemik ("E6") = Me.opt3.CaptionLaadi mind mahaEnd Sub |
Seejärel saame vormi käivitada, täita tekstiväljad ja valida ripploendist. Seejärel klõpsame teabe sisestamiseks Excelisse OK.
