Excel VBA Userform
A VBA felhasználói forma testreszabott, felhasználó által definiált űrlapok, amelyek úgy készülnek, hogy a felhasználótól egy űrlap formátumában vegyenek részt. Különböző vezérlőcsoportokkal rendelkezik , például szövegdobozok, jelölőnégyzetek címkék stb. és az értéket a munkalapon tárolja, a felhasználói űrlap minden részének egyedi kódja van.
A Userform egy objektum az Excel felületén, és ezen a felhasználói űrlapon belül létrehozhatunk más hasznos egyéni párbeszédpaneleket is, hogy az adatokat megszerezzük a felhasználótól. Amikor egy idősebb által létrehozott vagy az internetről letölthető makrófájllal dolgozik, akkor biztosan látott egy ilyen felhasználói űrlapot.
Ebben a cikkben megmutatjuk, hogyan hozhat létre hasonló felhasználói űrlapot a felhasználó adatainak tárolásához.
Hogyan készítsünk Userform-ot?
Hasonlóan ahhoz, ahogyan hasonlóan szúr be egy új modult, a Userform beillesztéséhez a Visual Basic Editorban kattintson az INSERT gombra.
Amint erre kattint, a felhasználói űrlap is be lesz illesztve.
Mielőtt elmondanám, hogyan kell ezt programozni, hadd mutassam meg, hogyan formázza ezt a felhasználói űrlapot.
A Userform formázása
A felhasználói forma kiválasztásával nyomja meg az F4 billentyűt, és megjeleníti a tulajdonságok ablakot.
Ennek a tulajdonságablaknak a segítségével formázhatjuk ezt a felhasználói űrlapot. Nevezhetjük. Megváltoztathatjuk a színt, a szegélystílust stb.
Ilyen módon próbáljon meg más tulajdonságokat megismerni a felhasználói űrlapon.
Most ehhez a felhasználói formához helyezze be az Eszköztárat.
Most egy ilyen eszköztárat fogunk látni.
Ebben a pillanatban a felhasználói űrlapot csak beillesztik, nem programozzák. Ha tudni szeretné, hogyan működik, kattintson a futtatás gombra. Az űrlapot meglátjuk az excel munkalapon.
Most a ToolBox rajzcímkét használja.
Írja be a Szöveget alkalmazott névként a címkébe.
Ehhez a címkéhez, így a tulajdonságok segítségével formázhatunk. Most beírtuk a szöveget „Munkavállaló neve” néven: ezt láthatjuk a tulajdonságok ablakban a Feliratok alatt.
Helyezzen be még egy címkét. Még egy címke beszúrásához kattintson az eszköztárra, vagy húzza az aktuális címkét a Ctrl billentyű lenyomásával . Lesz egy másolata az aktuális címkéről.
Most ugyanaz a címke lesz.
Változtassa a nevet Employee ID-re.
Most hasonlóképpen helyezzen be még egy címkét, és nevezze el „Osztálynak”.
Most az eszköztárból helyezzen be egy szövegdobozt.
Nevezze el ezt a szövegdobozt EmpName néven a tulajdonságok ablakban.
Ehhez szúrjon be még két szövegmezőt az Alkalmazotti azonosító és az Osztály részéről. Nevezze el ezeket a szövegdobozokat a címsoruk szerint.
Hasonlóképpen tegye meg az osztály számára.
Most az eszköztárból helyezze be a Parancs gombot.
Változtassa meg a Parancs gomb nevét „SubmitButton” -ra, és változtassa meg a „Submit” feliratot .
Insert one more button and call it “Cancel.”
Now just to see run, press the run button or use the F5 key and see how your userform looks like in Excel.
Now it is coming to the shape.
VBA Code
Now the user will enter data in this, so we need to program this to store the data entered by the user on this form.
Double click on the SUBMIT button, it will take you to the macro window with an auto-created macro like the below.
It says SubmitButton click, remember we had given a name for the SUBMIT button as SubmitButton.
So, whenever we want to call this button, we can call this by this name (submit button). Inside this macro, copy and paste the below code.
Code:
Private Sub SubmitButton_Click() Dim LR As Long LR = Cells(Rows.Count, 1).End(xlUp).Row + 1 Cells(LR, 1).Value = EmpName.Value Cells(LR, 2).Value = EmpID.Value Cells(LR, 3).Value = Dept.Value EmpName.Value = "" EmpID.Value = "" Dept.Value = "" End Sub
- EmpName.Value here EmpName is the text box name we had given while creating the employee name text box.
- EmpID.Value here EmpID is the text box name of the Employee ID text box.
- Dept.Value this is the department text box name.
So, on the click on the submit button, it will store the values in the mentioned cells.
Now double click on the Cancel button. This will also show you the auto macro name like this.
Copy the below code and paste.
Code:
Private Sub CancelButton_Click() MyUserForm.Hide End Sub
A MyUserForm az a név, amelyet a felhasználói űrlapnak adtunk. A MyUserForm.Hide azt jelenti, hogy a CANCEL gombra kattintva elrejti a felhasználói űrlapot.
Ok, most hozzon létre egy ehhez hasonló sablont a munkalapon.
Törölje a munkafüzet összes többi lapját, kivéve ezt a sablonlapot.
Most lépjen a Visual Basic Editor oldalra.
És futtassa a makrót az F5 billentyűvel vagy manuálisan, a felhasználói űrlapot látjuk magunk előtt.
Írja be a munkavállaló nevét, a munkavállaló azonosítóját és az osztály nevét.
Most, ha a SUBMIT gombra kattint, az értékeket az általunk létrehozott sablonba tárolja.
Így továbbra is megadhatja a neveket. A userform folyamatosan tárolja a felhasználó által megadott értékeket a megadott cellákban.
Tehát a FELHASZNÁLÓI FORMA használatával valóban csodálatos projekteket hozhatunk létre, hogy információkat szerezzünk a felhasználótól.
