VBA -s saate luua Valikunupp võimaldab kasutajal valida mitme valiku hulgast. Kasutajavormides kasutatakse sageli valikunuppu, kuid seda saab kasutada ka töölehel. Selles õpetuses saate teada, kuidas luua valikunuppu, saada kasutaja valik VBA -s ja seda koodis kasutada.
Kui soovite õppida märkeruudu loomist, klõpsake siin: VBA märkeruut
Loo valikunupp
Valikute nupu töölehele sisestamiseks peate minema lehele Arendaja vahekaart, klõpsake Sisesta ja valige ActiveX -juhtelementide alt Valikunupp:
Pilt 1. Sisestage töölehele valikunupp
Kui valite lisatud nupu Valik, saate klõpsata Omadused all Arendaja vahekaart:
Pilt 2. Muutke suvandi nuppu Atribuudid
Siin saate määrata nupu Valik erinevaid atribuute. Alustuseks muutsime atribuuti Nimi et optOptionButton1. Nüüd saame selle nimega VBA -koodis kasutada suvandi nuppu Valik.
Samuti muutsime nupu Valik kõrval kuvatavat teksti Mees. Selleks peate määrama atribuudi Pealkiri.
Kuna tahame lubada kasutajal soo valida, kordame kogu protsessi teise nupu Valik jaoks. Teisel on nimi optOptionButton2, samas kui pealdis on Naine. Samuti saate uue nupu Valik luua, kopeerides olemasoleva ja muutes atribuute. Nüüd on meie töölehel kaks valikunuppu:
Pilt 3. Sisestage teine valikunupp
Hankige valitud suvandi nupp VBA -s
Valikunupu eesmärk on saada kasutajatelt otsus. Näitame näites, kuidas kirjutada Mees lahtris C3, kui on valitud suvandinupp 1 või Naine kui valitakse teine. Igal valikunupul on oma sündmus, mis käivitub selle valimisel - Klõpsake nuppu.
Seetõttu peame esimese valikunupu jaoks sündmusele sisestama järgmise koodi Klõpsake nuppu objektist optOptionButon1:
| 123456789 | Private Sub optOptionButton1_Click ()If Sheet1.optOptionButton1.Value = Tõene siisSheet1.Range ("C3") = "Mees"Lõpp KuiEnd Sub |
Samamoodi paneme selle koodi sündmusele Klõpsake nuppu objektist optOptionButton2:
| 123456789 | Private Sub optOptionButton2_Click ()If Sheet1.optOptionButton2.Value = Tõene siisSheet1.Range ("C3") = "Naine"Lõpp KuiEnd Sub |
Valiku nupu väärtus onVäärtus objekti atribuut optOptionButton1 või optOptionButton2. Valiku nupu väärtus võib olla tõene, kui see on valitud, või vale, kui seda ei valita.
Pilt 3. Tagasi mees, kui on valitud esimene valikunupp
Nagu näete pildil 3, klõpsasime esimest suvandi nuppu. Seetõttu väärtus Sheet1.optOptionButton1.Value on tõsi, nii et C3 tulemus on Mees.
Pilt 4. Naaske naissoost, kui on valitud teine valikunupp
Sarnaselt eelmisele näitele muudetakse C3 väärtus väärtuseks Naine, kuna oleme valinud teise suvandi Option. Sel juhul protseduur optOptionButton2_Click () käivitatakse.
Kasutage Userformis nuppu Valik
Nagu me mainisime, kasutatakse Userformsis kõige sagedamini nuppu Option. Selleks, et selgitada, kuidas saate seda teha, sisestame esmalt Userformi. VBA redaktoris paremklõpsake mooduli nime, klõpsake nuppu Sisesta ja valida UserForm:
Pilt 5. Sisestage kasutajavorm
Sisestamise juhtelementide kuvamiseks peate lubama Tööriistakast. Selleks klõpsake nuppuTööriistakast ikooni tööriistaribal. Pärast seda saate aknad koos kõigi saadaolevate juhtelementidega. Võite klõpsata nupulValikunupp selle loomiseks kasutajavormis:
Pilt 6. Sisestage suvandinupp kasutajavormi
Atribuutide aknas muudame nupu Option nimeks optOptionButton1 ja pealdise väärtuseks Mees. Sarnaselt lõime naise jaoks veel ühe nupu Valik. Userformi käivitamisel saame kaks valikunuppu:
Pilt 7. Kaks valikunuppu Userfo -srm
Kui soovite saada valitud suvandi nuppu, peate kasutama sama loogikat nagu töölehel, mida on artiklis varem selgitatud.
