Uporabniški obrazec za Excel VBA
Uporabniški obrazec v VBA so prilagojeni uporabniško določeni obrazci, ki so narejeni tako, da od uporabnika sprejmejo vnos v obliki obrazca, ima različne sklope kontrol, ki jih je treba dodati, na primer polja z besedilom, oznake potrditvenih polj itd., Ki vodijo uporabnika k vnosu vrednosti in vrednost shrani na delovni list, vsak del uporabniškega obrazca ima s seboj edinstveno kodo.
Userform je predmet v Excelovem vmesniku in znotraj tega uporabniškega obrazca lahko ustvarimo druga uporabna pogovorna okna po meri, s katerimi uporabnik pridobi podatke. Ko delate z datoteko makra, ki jo ustvari starejši ali jo lahko prenesete z interneta, ste morali videti tak uporabniški obrazec.
V tem članku vam bomo pokazali, kako ustvariti podoben uporabniški obrazec za shranjevanje podatkov od uporabnika.
Kako ustvariti uporabniško obliko?
Tako kot vstavite nov modul podobno, morate klikniti gumb INSERT v urejevalniku Visual Basic, da vstavite Userform.
Takoj ko kliknete na to, bo vstavljen tudi uporabniški obrazec.
Preden vam povem, kako to programirati, naj vam pokažem, kako formatirati ta uporabniški obrazec.
Oblikovanje uporabniške oblike
Z izbiro uporabniškega obrazca pritisnite tipko F4, prikaže se okno z lastnostmi.
S pomočjo tega okna lastnosti lahko formatiramo ta uporabniški obrazec. Lahko ga poimenujemo. Lahko spremenimo barvo, slog obrobe itd.…
Tako poskusite z drugimi lastnostmi, da si ogledate uporabniški obrazec.
Zdaj za ta uporabniški obrazec vstavite Toolbox.
Zdaj bomo videli takšno orodje.
Trenutno je uporabniški obrazec samo vstavljen in ne programiran. Če želite vedeti, kako deluje, preprosto kliknite gumb za zagon. Obrazec bomo videli na delovnem listu excela.
Zdaj uporabljamo nalepko ToolBox.
Besedilo vnesite kot ime zaposlenega znotraj nalepke.
Za to oznako lahko formatiramo z uporabo lastnosti. Zdaj smo besedilo vnesli kot »Ime zaposlenega:«, zdaj lahko to vidimo v oknu z lastnostmi pod Napisi.
Vstavite še eno nalepko. Če želite vstaviti še eno oznako, lahko kliknete na orodjarno ali pa trenutno oznako povlečete tako, da držite tipko Ctrl . Imeli boste kopijo trenutne nalepke.
Zdaj bomo imeli isto oznako.
Spremenite ime v ID zaposlenega.
Zdaj podobno vstavite še eno nalepko in jo poimenujte kot »Oddelek«.
Zdaj iz orodjarne vstavite besedilno polje.
Poimenujte to besedilno polje kot EmpName v oknu lastnosti.
Tako vstavite še dve polji z besedilom ID-ja zaposlenega in oddelka. Poimenujte polja z besedilom v skladu z njihovimi naslovi.
Podobno naredite za oddelek.
Zdaj iz orodjarne vstavite ukazni gumb.
Spremenite ime ukaznega gumba v »SubmitButton« in spremenite napis v »Submit«.
Vstavite še en gumb in ga pokličite »Prekliči«.
Zdaj samo, da si ogledate zagon, pritisnite gumb za zagon ali uporabite tipko F5 in si oglejte, kako izgleda vaš uporabniški obrazec v Excelu.
Zdaj prihaja do oblike.
Koda VBA
Zdaj bo uporabnik v to vnesel podatke, zato ga moramo programirati za shranjevanje podatkov, ki jih je uporabnik vnesel v ta obrazec.
Dvokliknite gumb POŠLJI, pripeljal vas bo do okna makra s samodejno ustvarjenim makrom, kot je spodaj.
Piše SubmitButton klik, ne pozabite, da smo gumbu SUBMIT dali ime kot SubmitButton.
Torej, kadar koli želimo poklicati ta gumb, ga lahko pokličemo s tem imenom (gumb za oddajo). Znotraj tega makra kopirajte in prilepite spodnjo kodo.
Koda:
Private Sub SubButton_Click () Dim LR as Long LR = Celice (Rows.Count, 1) .End (xlUp) .Row + 1 Cells (LR, 1) .Value = EmpName.Value Cells (LR, 2) .Value = EmpID Celice .Value (LR, 3) .Value = Dept.Value EmpName.Value = "" EmpID.Value = "" Dept.Value = "" End Sub
- EmpName.Value here EmpName je ime besedilnega polja, ki smo ga navedli pri ustvarjanju besedilnega polja imena zaposlenega.
- EmpID.Vrednost tukaj EmpID je ime besedilnega polja besedilnega polja ID zaposlenega.
- Dept.Value to je ime besedilnega polja oddelka.
Torej, s klikom na gumb za oddajo bo shranil vrednosti v omenjene celice.
Zdaj dvokliknite gumb Prekliči. Tako bo prikazano tudi ime samodejnega makra, kot je to.
Kopirajte spodnjo kodo in prilepite.
Koda:
Private Sub CancelButton_Click () MyUserForm.Hide End Sub
MyUserForm je ime, ki smo ga dali uporabniški obliki. MyUserForm.Hide pomeni, da s klikom na gumb PREKLICI skrije uporabniški obrazec.
Ok, zdaj na delovnem listu ustvarite takšno predlogo.
Izbrišite vse ostale liste v delovnem zvezku, razen tega lista s predlogo.
Zdaj pojdite na urejevalnik Visual Basic.
In zaženite makro s tipko F5 ali ročno, pred seboj bomo videli uporabniški obrazec.
Vnesite ime zaposlenega, ID zaposlenega in ime oddelka.
Če kliknete gumb POŠLJI, bodo vrednosti shranjene v predlogo, ki smo jo ustvarili.
Tako lahko še naprej vnašate imena. Uporabniški obrazec bo še naprej shranjeval vrednosti, ki jih je uporabnik vnesel v določene celice.
Z uporabo OBRAZCA ZA UPORABO lahko dejansko ustvarimo čudovite projekte, da pridobimo informacije od uporabnika.
