A VBA -ban létrehozhat egy Opció gomb hogy a felhasználó több lehetőség közül választhasson. Az Option gombot gyakran használják a Userforms -ban, de használható egy munkalapon is. Ebben az oktatóanyagban megtudhatja, hogyan hozhat létre egy Option gombot, hogyan választhatja ki a felhasználót a VBA -ban, és hogyan használhatja azt kódban.
Ha meg szeretné tanulni a jelölőnégyzet létrehozását, kattintson ide: VBA jelölőnégyzet
Hozzon létre egy opciógombot
Ha be szeretne illeszteni egy Opció gombot a munkalapba, menjen a Fejlesztői lap, kattintson Beszúrás és az ActiveX vezérlők alatt válassza a lehetőséget Opció gomb:
Kép 1. Illesszen be egy Opció gombot a munkalapba
Amikor kiválasztja az Opció gombot, amelyet beillesztett, rákattinthat Tulajdonságok alatt Fejlesztői lap:
2. kép. Változtassa meg az Opció gomb Tulajdonságok parancsát
Itt állíthatja be az Option gomb különböző tulajdonságait. Kezdetben megváltoztattuk az attribútumot Név nak nek optOptionButton1. Most használhatjuk az Option gombot ezzel a névvel a VBA kódban.
Továbbá az Opció gomb mellett megjelenő szöveget erre módosítottuk Férfi. Ehhez be kell állítania az attribútumot Felirat.
Mivel szeretnénk lehetővé tenni a felhasználó számára a nem kiválasztását, megismételjük az egész folyamatot egy másik Opció gombhoz. A másodiknak neve van optOptionButton2, míg a felirat az Női. Létrehozhat egy új Option gombot is a meglévő másolásával és a tulajdonságok megváltoztatásával. Most a munkalapunk két lehetőséggombot tartalmaz:
3. kép. Helyezze be a második Option gombot
Szerezzen be egy kiválasztott opciógombot a VBA -ban
Az Option gomb célja, hogy a felhasználók döntést hozzanak. A példában megmutatjuk, hogyan kell írni Férfi a C3 cellában, ha az Opció 1 gomb van kiválasztva, vagy Női ha a másodikat választják. Minden Option gombnak megvan az eseménye, amely kiválasztásakor aktiválódik - Kattintson.
Ezért az első Opció gombhoz be kell írnunk a következő kódot az eseménybe Kattintson a tárgyról optOptionButon1:
| 123456789 | Private Sub optOptionButton1_Click ()Ha Sheet1.optOptionButton1.Value = Igaz akkorSheet1.Range ("C3") = "Férfi"Vége HaEnd Sub |
Hasonlóképpen, beírjuk ezt a kódot az eseménybe Kattintson a tárgyról optOptionButton2:
| 123456789 | Privát alopOptionButton2_Click ()Ha Sheet1.optOptionButton2.Value = Igaz akkorSheet1.Range ("C3") = "Nő"Vége HaEnd Sub |
Az Option gomb értéke aÉrték az objektum attribútuma optOptionButton1 vagy optOptionButton2. Az Option gomb értéke igaz lehet, ha ki van választva, vagy hamis, ha nincs kiválasztva.
3. kép. Vissza a Male -t, ha az első Option gombot választja
Amint a 3. képen látható, rákattintottunk az első Opció gombra. Ezért az értéke Sheet1.optOptionButton1.Value igaz, tehát a C3 -as eredmény az Férfi.
4. kép: Return Female, ha a második Option gombot választja
Az előző példához hasonlóan a C3 értéke erre változik Női, mivel a második Option gombot választottuk. Ebben az esetben az eljárás optOptionButton2_Click () aktiválódik.
Használja az Option gombot a Userformban
Amint említettük, az Option gombot leggyakrabban a Userforms -ban használják. Ennek megmagyarázásához először be kell illesztenünk egy felhasználói űrlapot. A VBA szerkesztőben kattintson a jobb gombbal a modul nevére, majd kattintson a gombra Beszúrás és válasszon UserForm:
5. kép. Szúrjon be egy felhasználói űrlapot
A beszúrás vezérlőinek megjelenítéséhez engedélyeznie kell a Eszköztár. Ehhez kattintson a gombraEszköztár ikont az eszköztáron. Ezt követően megkapja az ablakokat az összes rendelkezésre álló vezérlővel. Kattintson aOpció gomb létrehozásához a felhasználói űrlapon:
6. kép. Helyezzen be egy Option gombot a Userform -ba
A tulajdonságok ablakban megváltoztatjuk az Option gomb nevét az opOptionButton1 és a felirat értékre Férfi. Hasonlóképpen létrehoztunk egy másik Option gombot a Női számára. A Userform futtatásakor két Option gombot kapunk:
7. kép. Két opciógomb a Userfo -banrm
Ha egy kiválasztott Opció gombot szeretne kapni, akkor ugyanazt a logikát kell használnia, mint a Munkalapon, amelyet a cikk korábban ismertet.
