VBA UserForm - Sådan oprettes UserForm i Excel ved hjælp af VBA-kode?

Excel VBA UserForm

I Excel VBA har vi et meget nyttigt værktøj, der kaldes UserForm. Det er en praktisk måde at få information fra en bruger på. Hvad er en UserForm i VBA? UserForm er som en guide eller en dialogboks, hvor vi beder brugerne om at indtaste data, og den har nogle instruktioner om det.

VBA UserForm er også indbygget i Excel og kan oprettes af udviklerne. For først at bruge VBA-brugerformular skal vi aktivere udviklerfanen fra fanen Indstillinger. Når udvikler-fanen er aktiveret, kan vi gå videre i Excel VBA og oprette UserForms. Brugerformularer bruges til at gemme data i Excel. Det kan sammenlignes med google-formularer, hvor vi har et specifikt sæt instruktioner og beder brugeren om at indtaste data som beskrevet i instruktionerne.

UserForm bruges bredt overalt. I UserForm gemmes de data, som brugeren indtaster, i den tilsvarende kolonne. Det er den mest praktiske måde i excel at tage input fra brugeren og gemme dataene i excel relativt på det korrekte sted.

Sådan oprettes UserForm i Excel VBA?

Nedenfor er de forskellige eksempler til at oprette UserForm i Excel ved hjælp af VBA-kode.

Du kan downloade denne VBA UserForm Excel-skabelon her - VBA UserForm Excel Template

Excel VBA UserForm - Eksempel # 1

Lad os først komme til det grundlæggende i UserForm. Sådan vises en UserForm, og hvad en UserForm er.

Gå til Excel-regnearket til fanen Udvikler og klik på Visual Basic-editoren.

Hvordan tilføjer vi en brugerformular til denne tomme skærm? Klik på UserForms i indsætningsværktøjet.

En ny guiden boks åbnes, og det er tomt, som er vores tomme brugerform.

Det er i øjeblikket navngivet som userform1, da vi ikke har givet det noget navn. Vi kan gøre det ved at ændre dets navn fra egenskabsmuligheden i venstre side af skærmen.

Lad os ændre navnet til prøveform og se resultatet.

Vores brugerformular er navngivet som prøve nu.

Lad os nu prøve at ændre farven på brugerformen. I egenskabsværktøjskassen har vi dropdown leveret til os navngivet som baggrundsfarve, vi kan vælge ethvert sæt farver, vi ønsker.

Efter at jeg har valgt indstillingen til sort farve, er min prøve UserForms farve blevet ændret som følger,

Hvordan kører vi denne brugerform? Sørg for, at vi har klikket på selve brugerformularen, og klik på kørselsknappen vist på skærmbilledet nedenfor. Når vi klikker på knappen Kørsel, kan vi se, at der vises en blank form i excel-skærmen.

Det har ingen andre muligheder end at lukke det, fordi vi ikke har tilføjet andre knapper til det.

Excel VBA UserForm - Eksempel # 2

Lad os se, hvordan du tilføjer knapper til en brugerformular for at indtaste dataene i Excel VBA. Vi laver en simpel VBA-brugerformular, hvor vi beder brugeren om at indtaste hans navn, alder og køn. Trinene, der er involveret i fremstillingen af en sådan brugerform, er som følger.

I Excel-regnearket skal du gå til udviklerens fane og klikke på den visuelle basiseditor.

Klik nu på faneformularen på indsæt for at åbne et brugerformularvindue.

Vi er nødt til at tilføje knapper til denne brugerformular for at få input fra brugeren. Vi kan se, at der også åbnes en værktøjskasse ved siden af vores brugerformular, der har kontrolknapperne.

Denne værktøjskasse har forskellige kontroller, som bruges i UserForms.

Så for vores eksempel har vi brug for et navn, alder og køn for at blive indtastet af brugeren. Vi har grundlæggende brug for tre etiketter, der repræsenterer vores instruktioner. Klik på etiketter .

Hold musen nede på brugerformularen, og klik og træk for at indsætte en etiket i brugerformularen.

I øjeblikket er det navngivet som etiket 1, vi har brug for at ændre etiketnavnet til “ Navn ” til instruktionen til brugeren. Klik på etiketten, og slet det angivne standardnavn, og indsæt det nye navn.

Indsæt nu etiketten for Alder og køn på en lignende måde og omdøb dem.

Ved siden af etiketterne skal vi indsætte en tekstboks, så brugeren kan indtaste værdier. Fra værktøjskassekontrollerne skal du klikke på TextBox

Hold musen ved siden af etiketterne, og klik på formularen.

Lad os nu indsætte kommandoknappen i brugerformularen, som vil gemme dataene for os. Fra værktøjskassekontrollerne skal du klikke på CommandButton .

Hold musen nede på formularen.

Skift billedtekst til CommandButton1 til “Send” .

Indsæt en kommandoknap, og kald den som " Annuller ".

Det næste trin er at omdøbe hver af tekstbokse, så vi nemt kan bruge dem i vores koder. For navn omdøbe tekstboksen mod den som Nameva for navneværdi og for alder som Ageva på lignende måde for køn som Genderva for kønsværdi,

Kør UserForm ved at klikke på play-knappen eller ved at trykke på F5-tasten.

I Excelarket skal overskriften for dataene indtastes som følger.

Dobbeltklik på knappen Send, som åbner kodevinduet for os for knappen Send som følger.

Kode:

 Privat underkommandoButton1_Klik () Slut sub

I kodevinduet erklæres en variabel, så længe som vist nedenfor.

Kode:

 Privat underkommandoButton1_Klik () Dim A As Long End Sub

Lad os nu flytte den første ledige celle i den første kolonne med følgende kode.

Kode:

 Privat underkommandoKnap1_Klik () Dim A As Long A = Cells (Rows.Count, 1). End (xlUp) .Row + 1 End Sub

Lad os gemme den værdi, som brugeren leverer i regnearket med følgende kode.

Kode:

 Privat underkommandoKnap1_Klik () Dim A så lang A = celler (rækker.antal, 1). Ende (xlUp). Række + 1 celler (A, 1). Værdi = Nameva.Value celler (A, 2). Værdi = Ageva .Valueringsceller (A, 3) .Value = Genderva.Value Nameva.Value = "" Ageva.Value = "" Genderva.Value = "" End Sub

Dobbeltklik nu på knappen Annuller, dette viser dig også det automatiske makronavn som dette.

Kode:

 Privat underkommandoButton2_Klik () Slut sub

Brug nedenstående kode.

Kode:

 Privat underkommandoButton2_Klik () UserForm1.Hide End Sub

Kør brugerformularen fra den medfølgende køreknap eller ved at trykke på F5-tasten, og vi får følgende resultat.

Indtast værdierne i tekstfelterne som følger.

Tryk på knappen Send for at se resultatet i excelark som følger.

Dette er, hvordan vi opretter en brugerform til at hente dataene fra brugeren.

Ting at huske

Brugerformer er indbygget eller kan oprettes af udvikleren i VBA.
Brugerforms egenskaber kan ændres fra egenskabsguiden i VBA.
Brugerformer skal have knapper for at hente data fra brugeren.
For at køre en brugerform skal du sikre dig, at brugerformularen er valgt.

Anbefalede artikler

Dette er en guide til VBA UserForm. Her diskuterer vi, hvordan man opretter UserForm i Excel ved hjælp af VBA-kode sammen med nogle praktiske eksempler og downloadbar excel-skabelon. Du kan også gennemgå vores andre foreslåede artikler -