Ez a cikk bemutatja, hogyan kell használni a szövegdobozt az Excel VBA -ban.
A VBA képes olyan űrlapok létrehozására, amelyekkel a felhasználó kölcsönhatásba léphet, mint például számla űrlapok vagy kapcsolattartási adatok. A szövegdobozok olyan vezérlők, amelyeket ezeken az űrlapokon lehet használni, vagy a szövegdobozok közvetlenül az Excelben hozhatók létre.
Szövegdobozok létrehozása VBA űrlapokon
Szövegmező beszúrásához a VBA űrlapba először létre kell hoznunk az űrlapot. Ez a VBE szerkesztőben történik.
Először nyissa meg a VBE szerkesztőt az Excelben.
Ha új felhasználói űrlapot szeretne beszúrni a kódjába, válassza a UserForm opciót a Beszúrás menüből.
Egy új felhasználói űrlap jelenik meg a Project Explorer és megjelenik a jobb oldali Kódablakban.
Az űrlapot a Tulajdonságok doboz. Ennek az ön alatt kell megjelennie Project Explorer.
Ha jól látható, nyomja meg a gombot F4 vagy kattintson Kilátás, Tulajdonságok ablak.
Kattintson a Név tulajdonságot, és nevezze át az űrlapot.
Most megkezdhetjük űrlapunk vezérlőkkel való feltöltését - a szövegmező vezérlője a legnépszerűbb vezérlőelem a címkevezérlővel együtt.
Az űrlap vezérlőkkel való feltöltéséhez be kell kapcsolnunk az Eszköztárat.
Ban,-ben Menü, válassza ki Nézet> Eszköztár.
Szövegmező létrehozásához az űrlapon válassza ki a Szövegmező vezérlőt az Eszköztárban.
Húzzon egy doboz alakzatot az űrlapon az egérrel, tartsa lenyomva a bal gombot, majd engedje fel az egérgombot.
Mivel ez az első szövegdoboz, amelyet létrehozunk, a neve TextBox1 lesz. Az űrlaphoz hasonlóan a Tulajdonságok ablakban is átnevezheti a szövegdobozt.
Lehet, hogy címkét kell létrehoznia az űrlapon található szövegmezőhöz is. Ez címkevezérlővel történik. Húzza az űrlapot ugyanúgy, mint egy szövegmezőt, majd beírhatja a kívánt szöveget a címkevezérlőbe, pl .: Keresztnév az alábbiak szerint.
Az űrlap VBA -kódon belüli használatához hozzá kell adnunk egy parancsgombot az űrlaphoz. Ehhez válassza ki a Parancsgomb vezérlőt az Eszköztárban, és húzza a gombot az űrlapra.
Ezután folytathatja az űrlap létrehozását szövegdobozok, címkék és parancsgombok segítségével, szükség szerint átnevezve őket.
Írási kód az űrlapok mögött
Miután létrehoztuk az űrlapot, írnunk kell VBA kódot, hogy az űrlapon lévő információkat beilleszthessük az Excel munkalapunkba. Ezt a kódot CBF (Kód az űrlapok mögött).
A VBE-ben kattintson duplán a parancsgombra, és lépjen a gomb mögötti kódra.
Létrejön a gomb kattintási eseményének alrutinja. Ebben a rutinban beírhatjuk a VBA kódunkat. Például:
| 123456 | Privát al cmdOK_Click ()Tartomány ("A1") = Me.txtFirstNameTartomány ("A2") = Me.txtNévTartomány ("A3") = Me.txtCellPhoneTölts ki engemEnd Sub |
Ez a rutin a szövegmezőkbe beírt részleteket Excelbe helyezi, majd bezárja az űrlapot.
Szövegdobozok létrehozása Excel munkalapon
Lehetőség van szövegdobozok létrehozására is az Excel táblázatban. Ehhez be kell kapcsolnia a fejlesztői szalagot.
Megjegyzés: Ha nem látja a Fejlesztői szalagot, akkor engedélyeznie kell azt.
A szalagon válassza a lehetőséget Fejlesztő> Beszúrás> ActiveX -vezérlők> TextBox.
Kattintson és húzza az Excel munkalapon, hogy a kívánt helyre húzza a munkalap szövegdobozát. Engedje fel az egérgombot a szövegdoboz rajzolásának befejezéséhez.
A szövegdoboz Tervezési módban lesz. Ebben a módban méretezhetjük a dobozt, és kiválaszthatjuk a szövegmező tulajdonságait.
Kattintson a Tulajdonságok gombot a szövegmező Tulajdonságok ablakának megjelenítéséhez. Ebben az ablakban megváltoztathatjuk a szövegdoboz számos tulajdonságát, például a doboz nevét, a szöveg színét, a hátteret vagy a szegélyt, a szegély stílust és a szövegmezőben használt betűtípust.
Ahhoz, hogy a szövegdobozt közvetlenül az Excelben használhassuk, ahogy azt a fenti VBA űrlapon használtuk, szükségünk van arra, hogy a szövegdobozba beírt adatokat az Excel -lapra visszaadjuk. Ezt úgy teheti meg, hogy hozzáad egy ActiveX parancsgombot a munkalaphoz, és ennek a parancsgombnak a click_event használatával visszaadja a szövegmezőben lévő információkat az Excel -lapnak.
A szalagon válassza a lehetőséget Fejlesztő> Beszúrás> ActiveX -vezérlők> Parancsgomb parancsgomb hozzáadásához az Excel -laphoz. Kapcsolja be a Tulajdonságok ablakot, és módosítsa a gomb nevét, a gomb feliratát és a gomb gyorsítóját az alábbi képen látható módon.
Kattintson duplán a gombra a gomb VBA kattintási eseményéhez való belépéshez, és írja be a következő kódot:
| 123 | Privát al cmdOK_Click ()Tartomány ("A1") = Me.txtFirstNameEnd Sub |
Váltson vissza az Excel munkalapra, győződjön meg arról, hogy a Tervezési mód ki van kapcsolva, majd írja be a létrehozott szövegmezőt.
Kattintson a parancsgombra a szöveg Excelbe való visszaállításához.
