Vo VBA môžete vytvoriť súbor Voliteľné tlačidlo umožniť používateľovi vybrať si z niekoľkých možností. V používateľských formulároch sa často používa tlačidlo Možnosti, ale dá sa použiť aj v pracovnom hárku. V tomto tutoriále sa naučíte, ako vytvoriť tlačidlo Možnosti, získať vo VBA užívateľskú voľbu a použiť ju v kóde.
Ak sa chcete dozvedieť, ako vytvoriť začiarkavacie políčko, kliknite sem: Začiarkavacie políčko VBA
Vytvorte tlačidlo Možnosti
Ak chcete do pracovného hárka vložiť tlačidlo Možnosti, musíte prejsť na Karta vývojára, klikni Vložiť a v časti Ovládacie prvky ActiveX vyberte Tlačidlo možnosti:
Obrázok 1. Do pracovného hárka vložte tlačidlo Možnosti
Keď vyberiete tlačidlo Možnosti, ktoré ste vložili, môžete naň kliknúť Vlastnosti pod Karta vývojára:
Obrázok 2. Zmeňte tlačidlo Možnosti na položku Vlastnosti
Tu môžete nastaviť rôzne vlastnosti tlačidla Možnosti. Na začiatku sme zmenili atribút názov do optOptionButton1. Teraz môžeme v kóde VBA použiť tlačidlo Možnosti s týmto názvom.
Tiež sme zmenili text, ktorý sa zobrazuje vedľa tlačidla Možnosti, na Muž. Ak to chcete urobiť, musíte nastaviť atribút Titulok.
Keďže chceme používateľovi umožniť vybrať si pohlavie, celý postup zopakujeme pre ďalšie tlačidlo Možnosti. Druhý má meno optOptionButton2, zatiaľ čo nadpis je Žena. Môžete tiež vytvoriť nové tlačidlo Možnosti skopírovaním existujúceho a zmenou vlastností. Náš pracovný list má teraz dve tlačidlá možností:
Obrázok 3. Vložte druhé tlačidlo Možnosti
Získajte tlačidlo vybranej možnosti vo VBA
Účelom tlačidla Možnosti je dosiahnuť rozhodnutie používateľov. V príklade si ukážeme, ako písať Muž v bunke C3, ak je zvolené tlačidlo Možnosti 1 alebo Žena ak je zvolený druhý. Každé tlačidlo Možnosti má svoju udalosť, ktorá sa spustí, keď je vybratá - Kliknite.
Preto pre prvé tlačidlo Možnosti musíme do udalosti vložiť nasledujúci kód Kliknite predmetu optOptionButon1:
| 123456789 | Private Sub optOptionButton1_Click ()If Sheet1.optOptionButton1.Value = True ThenList1.Range ("C3") = "Muž"Koniec AkKoniec pod |
Podobne vložíme tento kód do udalosti Kliknite predmetu optOptionButton2:
| 123456789 | Súkromná sub optOptionButton2_Click ()Ak Sheet1.optOptionButton2.Value = True ThenList1.Range ("C3") = "Žena"Koniec AkKoniec pod |
Hodnota tlačidla Možnosti je vHodnota atribút objektu optOptionButton1 alebo optOptionButton2. Hodnota tlačidla Možnosti môže byť pravdivá, ak je vybratá, alebo nepravdivá, ak nie je zvolená.
Obrázok 3. Ak je vybraté prvé tlačidlo Možnosti, vráťte muža
Ako vidíte na obrázku 3, klikli sme na prvé tlačidlo Možnosti. Preto hodnota Sheet1.optOptionButton1.Value je pravda, takže výsledok v C3 je Muž.
Obrázok 4. Vrátiť ženu, ak je vybraté druhé tlačidlo Možnosti
Podobne ako v predchádzajúcom prípade sa hodnota C3 zmení na Žena, keďže sme vybrali druhé tlačidlo Možnosti. V tomto prípade postup optOptionButton2_Click () je spustený.
V používateľskom formulári použite tlačidlo Možnosti
Ako sme už spomenuli, v užívateľských formulároch sa najčastejšie používa tlačidlo Možnosti. Aby sme vám vysvetlili, ako to môžete urobiť, najskôr vložíme užívateľský formulár. V editore VBA kliknite pravým tlačidlom myši na Názov modulu, kliknite na Vložiť a vyber si UserForm:
Obrázok 5. Vložte užívateľský formulár
Ak chcete zobraziť ovládacie prvky na vkladanie, musíte povoliť Sada nástrojov. Ak to chcete urobiť, kliknite naSada nástrojov ikonu na paneli s nástrojmi. Potom získate okná so všetkými dostupnými ovládacími prvkami. Môžete kliknúť naVoliteľné tlačidlo aby ste ho vytvorili v užívateľskej forme:
Obrázok 6. Do používateľského formulára vložte tlačidlo Možnosti
V okne vlastností zmeníme názov tlačidla Možnosti na optOptionButton1 a titulok na Muž. Podobne sme vytvorili ďalšie tlačidlo Možnosti pre ženu. Keď spustíme Userform, dostaneme dve tlačidlá Možnosti:
Obrázok 7. Dve tlačidlá Možnosti v Userform
Ak chcete získať vybraté tlačidlo Možnosti, musíte použiť rovnakú logiku ako pre pracovný hárok, ktorý je vysvetlený vyššie v článku.
