Mi az a VBA TextBox az Excelben?
A VBA TextBox az Excel alkalmazásban a UserForm vezérlőelemek közül a sok vezérlés közül. A VBA TextBox hasznos lehet, ha a felhasználó nevét, életkorát, címét, fizetését stb. Szeretné megkapni, például a felhasználó nevét, életkorát, címét, fizetését stb. A TextBox vezérlővel engedélyezheti a felhasználók számára, hogy ilyen információkat írjanak be, és sok időt takarítsanak meg, valamint az írási hibákat. . A VBA TextBox statikus vagy dinamikus adatokból állhat.
Maga a UserForm egy nagyon hasznos eszköz, amelynek különféle vezérlési lehetőségei vannak, például a TextBox, az MsgBox és az InputBox stb., Amelyek praktikusabb módszert kínálnak az adatok megszerzéséhez a felhasználótól, így ezek az adatok funkcionálisan feldolgozhatók, és ezekből hasznos betekintést nyerhetnek belőle. .
Ebben a cikkben gyakorlati tapasztalatokat szerezhet az Excel VBA TextBox alkalmazásban.
Példák az Excel VBA TextBox-ra
Az alábbiakban bemutatjuk a VBA TextBox különféle példáit Excelben.
Itt letöltheti ezt a VBA TextBox Excel sablont - VBA TextBox Excel sablon1. példa - Hogyan lehet beszúrni a TextBox-ot a VBA-ba?
Az alábbiakban bemutatjuk a TextBox beillesztésének lépéseit az Excel VBA fájlba.
1. lépés: Nyisson meg egy Excel fájlt, és nyomja meg az Alt + F11 billentyűt a VBA ablaktáblára való navigáláshoz.
2. lépés: Ahogy már tárgyaltuk, a TextBox opció elérhető a UserFormban. Tehát be kell illesztenünk a UserForm-ot a VBE-be. Lépjen a Beszúrás menübe > Kattintson a UserForm elemre.
3. lépés: Amint beilleszt egy UserForm-t a VBA-ba, láthatja egy eszközkészlet opciót, amely hozzá van társítva, és különféle lehetőségek állnak rendelkezésre a UserForm-hoz.
4. lépés: Ebben az eszköztárban válassza a TextBox lehetőséget .
5. lépés: Húzza ezt a szövegdobozt a felhasználói űrlapra.
6. lépés: Nyomja meg az F4 billentyűt a UserForm tulajdonságainak megtekintéséhez (Alternatívaként úgy is megteheti, hogy jobb egérgombbal kattint a beillesztett UserForm elemre). Ezek a tulajdonságok lehetővé teszik a szükséges változtatások elvégzését, például a UserForm nevének megváltoztatását annak könnyű elérése érdekében.
Néhány alapvető változtatás, amelyet a UserForm tulajdonságai ablaktáblán végezhet, például a betűkészlet megváltoztatása, a méret megváltoztatása stb.
7. lépés: Írja be a szöveget úgy, hogy „ Üdvözöljük a VBA TextBox! ”A TextBox-ban, a UserForm alatt.
Így hozhat létre egy VBA TextBox-ot.
2. példa - Érték beállítása a VBA TextBox értékre
Lássuk, hogyan állíthatjuk be a TextBox értékeit. Időnként kötelező az értékeket beállítani, ellenkező esetben a felhasználó bármi érdekeset megad.
1. lépés: Helyezzen be egy új felhasználói formátumot a VBE-be. Lépjen a Beszúrás menübe, majd kattintson a UserForm elemre .
2. lépés: A UserForm Tools alkalmazásból válassza a TextBox elemet, és húzza a UserForm mappába.
3. lépés: Helyezze el a CommandButton gombot a UserForm alá, ugyanúgy, ahogy a TextBox-ot hozzáadta.
4. lépés: Változtassa meg a parancsgomb feliratát a „ Küldés ” elemre a tulajdonságok alatt. A parancsgomb tulajdonságaihoz navigálhat a jobb egérgombbal a Parancsgomb> Kattintson a Tulajdonságok elemre .
5. lépés: Kattintson duplán a beküldés gombra, vagy kattintson a jobb gombbal rá, és válassza a Kód megtekintése menüpontot.
6. lépés: A kódba illesszen be egy új kód sorát az alábbiak szerint.
Kód:
Privát sub CommandButton1_Click () TextBox1.Value = "A nevem Lalit!" Befejezés Sub
Ez a kiemelt kód lehetővé teszi az jobb oldali érték kettős idézőjelekkel ellátott értékének hozzárendelését a TextBox-hoz. A TextBox.Text tulajdonságot a TextBox.Values helyett a TextBox értékének beállításához is használhatja.
7. lépés: Nyomja meg az F5 vagy a Futtatás gombot a VBE alatt, hogy futtassa ezt a kódot, akkor megjelenik egy UserForm üres szövegdoboz. Amint megnyomja a beküldés gombot, a TextBox-hoz rendelt szöveg megjelenik benne.
3. példa - A szövegdoboz bevitelének korlátozása csak a numerikus értékek elfogadására
Kövesse az alábbi lépéseket:
1. lépés: Helyezzen be új UserForm-ot a VBA-ba, és adja hozzá a TextBox-ot.
2. lépés: Módosítsa a TextBox nevét a Tulajdonságok szakaszban a „ My_Age ” névre .
3. lépés: Kattintson duplán a TextBox elemre, vagy kattintson rá a jobb gombbal, és válassza a Kód megtekintése menüpontot.
Az alábbiak szerint láthatja az eredeti eljárást:
Kód:
Saját al My_Age_Change () Vége al
4. lépés: Most próbáljon hozzá egy If feltételt, amely a If Not-vel kezdődik.
Kód:
Saját al My_Age_Change () Ha nem fejeződik be
5. lépés: Kérje meg a fordítót, hogy ellenőrizze, hogy a TextBox „My_Age” értéke numerikus, vagy nem használja-e az IsNumeric Kulcsszót a If Not feltétel előtt.
Kód:
Privát al My_Age_Change () Ha nem, akkor szám nem numerikus (My_Age.Value) Befejezés al
6. lépés: Amint minden IF feltétel kéri, adjon hozzá egy majd kulcsszót.
Kód:
Privát Sub My_Age_Change () Ha nem IsNumeric (My_Age.Value), akkor End Sub
Ebben a kóddarabban azt kéri a fordítótól, hogy ellenőrizze, hogy a felhasználó által a TextBox alatt beírt érték numerikus-e vagy sem. Ha nem numerikus, akkor mit kell tennie? Kövesse a következő lépést.
7. lépés: Az MsgBox használatával adjon hozzá egy megjegyzést, például: „Sajnálom! Csak a számok engedélyezettek. ”Jelenik meg, ha a TextBox értéke nem numerikus.
Kód:
Privát al My_Age_Change () Ha nem IsNumeric (My_Age.Value), akkor MsgBox "Sajnálom! Csak a számok engedélyezettek." Befejezés Sub
8. lépés: Most zárja be ezt az IF-állítást az End IF kulcsszó használatával.
Kód:
Privát al My_Age_Change () Ha nem IsNumeric (My_Age.Value), akkor MsgBox "Sajnálom! Csak a számok engedélyezettek." End If End Sub
9. lépés: Most futtassa ezt a kódot az F5 gomb megnyomásával a billentyűzeten vagy a Futtatás gombra a VBE-n, és nézze meg a kimenetet. Kapsz egy TextBox-ot az alább látható módon:
Most megpróbálom egész számot beírni, és megnézem, valóban lehetővé teszi-e ugyanazok bevitelét.
Bingo, lehetővé teszi számomra az egész érték tárolását.
Most próbáljunk hozzá néhány úszót (Érték decimális pontokkal) ehhez a szövegmezőhöz, és nézzük meg, vajon lehetővé teszi-e ugyanazok bevitelét.
Ellenőrizzük, engedélyezi-e ez a szövegmező bizonyos negatív értékeket alatta. Beírok némi negatív számot és ellenőriztem.
Jól! Jól!! Nos, ez üzenetet küld nekem, mondván, hogy csak a számok megengedettek. Azért történt, mert ez az eredetileg írt kód IF-feltétellel rendelkezik, és nincs megoldása, hogy mit tegyen, ha a szám nem pozitív. Ráadásul az életkor nem lehet negatív. Jobb? Ezért figyelmeztető üzenetet kapok, amint a fent láthatja. Ha azonban az üzenetmezőben az OK gombra kattint, és megpróbálja megadni a számot, akkor ezt megteheti. De nem fogom ajánlani a szabályok megsértését ott.
Végül próbáljunk meg néhány szöveges karakterláncot a dobozban, és nézzük meg, lehetővé teszi-e ugyanaz a szövegmező alatt tárolását.
Mint helyesen vártam, amint beírta az első karakterláncot, a rendszer megakadályozta, hogy ezt tegyem egy üzenet küldésével. Ennek oka az, hogy megemlítettük egy olyan feltételt a kódunkban, amely szerint az érték nem numerikus, kérjük, küldjön egy üzenetet a felhasználó felé, mondván, hogy csak a numerikus értékek megengedettek.
Dolgok, amikre emlékezni kell
- A VBA TextBox egy speciális lehetőség a UserForm alatt. Amit úgy tervezték, hogy maga a felhasználó nyújtsa be az adatokat.
- Kétféle módszer állíthatja be a TextBox értékeit: a TextBox.Text és a TextBox.Value használatával.
- Időnként kötelező a felhasználói bemenetet korlátozni, hogy a megfelelő típusú adatokat kapjuk.
Ajánlott cikkek
Ez egy útmutató a VBA TextBox-hoz. Itt tárgyaljuk, hogyan lehet létrehozni a TextBox programot az Excel VBA alkalmazásban, a gyakorlati példákkal és a letölthető Excel sablonnal együtt. Megnézheti más javasolt cikkeinket -
- Hogyan kell használni a VBA IsNumeric függvényt?
- Kombinált mező létrehozása az Excel programban
- Helyezze be a CheckBox fájlt az Excelbe
- VBA UCASE függvény Excelben
- Hogyan lehet bezárni a UserForm-ot a VBA-ban?