VBA UserForm - Hvordan lage UserForm i Excel ved hjelp av VBA-kode?

Excel VBA UserForm

I Excel VBA har vi et veldig nyttig verktøy som er kjent som UserForm. Det er en praktisk måte å få informasjon fra en bruker. Hva er en UserForm i VBA? UserForm er som en veiviser eller en dialogboks der vi ber brukerne legge inn data, og den har noen instruksjoner om det.

VBA UserForm er også innebygd i Excel og kan opprettes av utviklerne. For å bruke VBA-brukerform først, må vi aktivere utvikler-fanen fra Alternativer-fanen. Når utvikler-fanen er aktivert, kan vi gå videre i Excel VBA og opprette UserForms. Brukerformer brukes til å lagre data i Excel. Det kan sammenlignes med google-skjemaer der vi har et spesifikt sett med instruksjoner og ber brukeren legge inn data i henhold til instruksjonene.

UserForm er mye brukt overalt. I UserForm blir dataene som er lagt inn av brukeren lagret i den tilsvarende kolonnen. Det er den mest praktiske måten i excel å komme med innspill fra brukeren og lagre dataene i excel relativt på riktig sted.

Hvordan opprette UserForm i Excel VBA?

Nedenfor er de forskjellige eksemplene for å opprette UserForm i Excel ved hjelp av VBA-kode.

Du kan laste ned denne VBA UserForm Excel Template her - VBA UserForm Excel Template

Excel VBA UserForm - Eksempel # 1

La oss først komme til det grunnleggende av UserForm. Hvordan vise en UserForm og hva en UserForm er.

I Excel-regnearket går du til kategorien Utvikler og klikker på Visual Basic-redigereren.

Hvordan legger vi til en brukerform til denne blanke skjermen? Klikk på UserForms i innsettingsverktøyet.

En ny veiviserboks åpnes og den er blank, som er vår blanke brukerform.

Det er for øyeblikket navngitt som userform1 da vi ikke har gitt det noe navn. Vi kan gjøre det ved å endre navnet fra egenskapsalternativet på venstre side av skjermen.

La oss endre navnet til eksempler og se resultatet.

Brukerformen vår er navngitt som eksempel nå.

La oss prøve å endre fargen på brukerformen. I egenskapsverktøykassen har vi rullegardinmenyen gitt oss som heter bakfarge, vi kan velge hvilket sett farger vi ønsker.

Etter at jeg har valgt alternativet for svart farge, er eksemplet på UserForms farge blitt endret som følger,

Hvordan kjører vi denne brukerformen? Forsikre deg om at vi har klikket på selve brukerformen og klikk på kjørknappen vist på skjermdumpen nedenfor. Når vi klikker på kjørknappen, kan vi se at et blankt skjema vises i excel-skjermen.

Den har ingen andre alternativer enn å lukke den fordi vi ikke har lagt noen andre knapper til den.

Excel VBA UserForm - Eksempel # 2

La oss se hvordan du legger til knapper i en brukerform for å legge inn dataene i Excel VBA. Vi vil lage en enkel VBA-brukerform der vi ber brukeren oppgi navn, alder og kjønn. Trinnene som er involvert i å lage en slik brukerform er som følger.

I Excel-regnearket går du til utviklerens fane og klikker på den visuelle basisredigereren.

Nå i insert-fanen klikker du på userform for å åpne et userform-vindu.

Vi må legge til knapper i denne brukerformen for å få innspill fra brukeren. Vi kan se at det også åpnes en verktøykasse ved siden av brukerformen vår som har kontrollknappene.

Denne verktøykassen har forskjellige kontroller som brukes i UserForms.

Så for eksempel, trenger vi et navn, alder og kjønn for å bli lagt inn av brukeren. Vi trenger i utgangspunktet tre etiketter som representerer instruksjonene våre. Klikk på Etiketter .

Hold musen på brukerformen, og klikk og dra for å sette inn en etikett i brukerformen.

For øyeblikket heter den som etikett 1 vi trenger å endre etikettnavnet til " Navn " for instruksjonen til brukeren. Klikk på etiketten og slett standardnavnet som er oppgitt, og sett inn det nye navnet.

Sett inn etiketten for Alder og kjønn på en lignende måte og gi dem nytt navn.

Nå ved siden av etikettene, må vi sette inn en tekstboks slik at brukeren kan legge inn verdier. Fra verktøykasse-kontrollene, klikk på TextBox

Hold musen ved siden av etikettene, og klikk på skjemaet.

La oss nå sette inn kommandoknappen i brukerformen som lagrer dataene for oss. Fra verktøykasse-kontrollene, klikk på CommandButton .

Hold musen på skjemaet.

Endre bildeteksten til CommandButton1 til “Submit” .

Sett inn en kommandoknapp og kall den som " Avbryt ".

Neste trinn er å gi nytt navn til hver av tekstboksene, slik at vi enkelt kan bruke dem i kodene våre. For å gi nytt navn til tekstboksen mot den som Nameva for navnverdi og for alder som Ageva på samme måte for kjønn som Genderva for kjønnsverdi,

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

I Excel-arket må du skrive overskriften for dataene som følger.

Dobbeltklikk på send-knappen som åpner kodevinduet for oss for send-knappen som følger.

Kode:

 Privat underkommandoButton1_Klikk () Slutt sub

I kodevinduet erklærer du en variabel så lenge som vist nedenfor.

Kode:

 Privat underkommandoButton1_Klikk () Dim A As Long End Sub

La oss nå flytte den første ledige cellen i den første kolonnen med følgende kode.

Kode:

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

La oss lagre verdien levert av brukeren i regnearket med følgende kode.

Kode:

 Privat underkommandoKnapp1_Klikk () Dim A As Long A = Cells (Rows.Count, 1). End (xlUp) .Row + 1 Cells (A, 1) .Value = Nameva.Value Cells (A, 2) .Value = Ageva .Value celler (A, 3). Verdi = Genderva.Value Nameva.Value = "" Ageva.Value = "" Genderva.Value = "" Slutt sub

Dobbeltklikk nå på Avbryt-knappen. Dette vil også vise deg et automatisk makronavn som dette.

Kode:

 Privat underkommandoButton2_Klikk () Slutt sub

Bruk koden nedenfor.

Kode:

 Privat underkommandoButton2_Klikk () UserForm1.Hide End Sub

Kjør brukerformen fra kjøreknappen som følger med, eller ved å trykke på F5-tasten, så får vi følgende resultat.

Angi verdiene i tekstboksene som følger.

Trykk på Send- knappen for å se resultatet i excelark som følger.

Slik lager vi en brukerform for å hente dataene fra brukeren.

Ting å huske

Brukerformer er innebygd eller kan opprettes av utvikleren i VBA.
Egenskapene til brukerform kan endres fra egenskapsveiviseren i VBA.
Brukerformer må ha knapper for å hente data fra brukeren.
For å kjøre en brukerform må du forsikre deg om at brukerformen er valgt.

Anbefalte artikler

Dette er en guide til VBA UserForm. Her diskuterer vi hvordan du oppretter UserForm i Excel ved hjelp av VBA-kode sammen med noen praktiske eksempler og nedlastbar Excel-mal. Du kan også gå gjennom andre foreslåtte artikler -