Formular de utilizare VBA - Cum se creează UserForm în Excel folosind codul VBA?

Formular de utilizare Excel VBA

În Excel VBA avem un instrument foarte util care este cunoscut sub numele de UserForm. Este un mod practic de a obține informații de la un utilizator. Ce este un UserForm în VBA? UserForm este ca o casetă de asistență sau o casetă de dialog în care rugăm utilizatorii să introducă date și care are câteva instrucțiuni despre aceasta.

VBA UserForm este, de asemenea, încorporat în excel și poate fi creat de dezvoltatori. Pentru a utiliza VBA sub formă de utilizator, trebuie să activăm fila dezvoltatorului din fila Opțiuni. Odată ce fila dezvoltatorului este activată, putem merge înainte în Excel VBA și să creăm UserForms. Formularele de utilizator sunt utilizate pentru a stoca date în excel. Poate fi comparat cu formularele google în care avem un set specific de instrucțiuni și rugăm utilizatorul să introducă date conform instrucțiunilor.

UserForm este utilizat pe scară largă peste tot. În UserForm datele introduse de utilizator sunt stocate în coloana corespunzătoare. Este cel mai practic mod în excel să preiați de la utilizator și să stocați datele în excel relativ în locația corectă.

Cum se creează UserForm în Excel VBA?

Mai jos sunt diferite exemple pentru a crea UserForm în Excel folosind codul VBA.

Puteți descărca acest șablon VBA UserForm Excel aici - șablonul VBA UserForm Excel

Formular de utilizare Excel VBA - Exemplul # 1

În primul rând, să trecem la elementele de bază ale UserForm. Cum să vizualizați un UserForm și ce este un UserForm.

În foaia de lucru Excel accesați fila Dezvoltatorului și faceți clic pe editorul Visual Basic.

Acum cum adăugăm o formă de utilizator la acest ecran gol? În instrumentul de introducere, faceți clic pe UserForms.

Se deschide o nouă casetă de asistent și este goală, care este forma noastră de utilizator necompletată.

În prezent este numit userform1 deoarece nu i-am dat niciun nume. Putem face asta schimbând numele său din opțiunea de proprietăți din partea stângă a ecranului.

Să schimbăm numele în formă de probă și să vedem rezultatul.

Formularul nostru de utilizator este numit ca exemplu acum.

Acum să încercăm să schimbăm culoarea forma de utilizare. În caseta de instrumente de proprietăți, ne este oferit un meniu derulant numit drept culoare înapoi, putem selecta orice set de culori dorim.

După ce am selectat opțiunea pentru culoarea neagră, culoarea probei UserForm a fost modificată după cum urmează,

Cum rulăm această formă de utilizator? Asigurați-vă că am dat clic pe formularul de utilizare în sine și faceți clic pe butonul de rulare afișat în imaginea de mai jos. Când facem clic pe butonul de rulare putem vedea că apare un formular gol pe ecranul Excel.

Nu are alte opțiuni decât să îl închidă pentru că nu i-am adăugat alte butoane.

Excel VBA UserForm - Exemplu # 2

Să vedem cum să adăugați butoane la o formă de utilizator pentru a introduce datele în Excel VBA. Vom face o simplă formă de utilizator VBA în care vom cere utilizatorului să-i înscrie numele, vârsta și sexul. Pașii implicați în realizarea unei astfel de forme de utilizator sunt următorii.

În foaia de lucru Excel accesați fila dezvoltatorului și faceți clic pe editorul vizual de bază.

Acum, în fila Insert, faceți clic pe Forma de utilizator pentru a deschide o fereastră cu Forma de Utilizare.

Trebuie să adăugăm butoane la această formă de utilizator pentru a obține aportul de la utilizator. Putem vedea că o casetă de instrumente este de asemenea deschisă lângă formularul nostru de utilizator care are butoanele de control.

Această casetă de instrumente are diverse controale, care sunt utilizate în UserForms.

Deci, de exemplu, avem nevoie de un nume, vârstă și sex pentru a fi introduse de utilizator. Practic avem nevoie de trei etichete care să reprezinte instrucțiunile noastre. Faceți clic pe Etichete .

Plasați mouse-ul pe formularul de utilizator și faceți clic și glisați pentru a insera o etichetă în formularul de utilizare.

În prezent, este numită eticheta 1 trebuie să schimbăm numele etichetei în „ Nume ” pentru instrucțiunea către utilizator. Faceți clic pe etichetă și ștergeți numele implicit furnizat și introduceți noul nume.

Acum introduceți eticheta pentru vârstă și sex într-un mod similar și redenumiți-le.

Acum adiacent etichetelor, trebuie să introducem o casetă de text pentru ca utilizatorul să poată introduce valori. Din controalele casetei de instrumente, faceți clic pe TextBox

Plasați mouse-ul adiacent pe etichete și faceți clic pe formular.

Acum să introducem butonul de comandă în formularul de utilizare care va stoca datele pentru noi. Din controalele casetei de instrumente, faceți clic pe CommandButton .

Plasați mouse-ul pe formular.

Modificați titlul CommandButton1 în „Trimite” .

Introduceți un buton de comandă și numiți-l ca „ Anulează ”.

Pasul următor este redenumirea fiecăreia dintre casetele de text, astfel încât să le putem utiliza cu ușurință în codurile noastre.

Rulați UserForm făcând clic pe butonul redare sau apăsând tasta F5.

În Foaia Excel scrieți antetul pentru date trebuie introdus după cum urmează.

Faceți dublu clic pe butonul de trimitere, care va deschide fereastra de cod pentru noi pentru butonul de trimitere, după cum urmează.

Cod:

 Subcomandă privatăButton1_Click () End Sub

În fereastra de cod, Declamați o variabilă atât timp cât este prezentat mai jos.

Cod:

 Private Sub CommandButton1_Click () Dim A As Long End Sub

Acum să mutăm prima celulă vacantă în prima coloană cu următorul cod.

Cod:

 Subcomandă privatăButton1_Click () Dim A As Long A = Cells (Rows.Count, 1) .nd (xlUp). Row + 1 End Sub

Să stocăm valoarea furnizată de utilizator în foaia de lucru cu următorul cod.

Cod:

 Subcomandă privatăButton1_Click () 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 Cells (A, 3) .Value = Genderva.Value Nameva.Value = "" Ageva.Value = "" Genderva.Value = "" End Sub

Acum faceți dublu clic pe butonul Cancel, acest lucru vă va arăta și numele macro macro ca acesta.

Cod:

 Subcomandă privatăButton2_Click () End Sub

Utilizați codul de mai jos.

Cod:

 Private Sub CommandButton2_Click () UserForm1.Hide Sub End

Rulați formularul de utilizare de la butonul de rulare furnizat sau apăsând tasta F5 și obținem următorul rezultat.

Introduceți valorile în casetele de text după cum urmează.

Apăsați butonul Trimitere pentru a vedea rezultatul în foaia excel după cum urmează.

Astfel creăm o formă de utilizator pentru a obține datele de la utilizator.

Lucruri de amintit

Formele de utilizator sunt încorporate sau pot fi create de dezvoltatorul din VBA.
Proprietățile userform pot fi modificate din caseta asistent de proprietăți din VBA.
Formularele de utilizator trebuie să aibă butoane pentru a prelua date de la utilizator.
Pentru a rula o formă de utilizator, asigurați-vă că forma de utilizator este selectată.

Articole recomandate

Acesta este un ghid pentru VBA UserForm. Aici vom discuta despre cum se creează UserForm în Excel folosind codul VBA împreună cu câteva exemple practice și șablonul excel descărcabil. De asemenea, puteți parcurge și alte articole sugerate -