/ / Excel VBA -valintapainikkeet

Excel VBA -vaihtoehtoiset painikkeet

Jos käytössä on useampi kuin yksi lisävarustepainike, vain yksi vaihtoehtoisista painikkeista voidaan valita. Luoda vaihtoehtoisia painikkeita sisään Excel VBAsuorita seuraavat vaiheet.

1. Valitse Kehittäjä-välilehdessä Lisää.

2. Valitse ActiveX Controls -ryhmässä Option-painike.

Luo lisäpainike Excel VBA: ssa

3. Vedä kaksi optiopainiketta laskentataulussa.

4. Napsauta hiiren kakkospainikkeella ensimmäistä vaihtoehtoa (varmista, että Suunnittelutila on valittuna).

5. Valitse Näytä koodi.

Katso koodi

Huomautus: voit muuttaa ohjauksen kuvatekstiä ja nimeä napsauttamalla ohjausta hiiren kakkospainikkeella (varmista, että Suunnittelutila on valittu) ja napsauttamalla sitten Ominaisuudet. Muuta optio-painikkeiden kuvatekstejä naaras- ja miespuolelle. Nyt jätämme OptionButton1 ja OptionButton2 vaihtoehtopainikkeiden nimet.

6. Lisää seuraava koodirivi:

If OptionButton1.Value = True Then Range("D3").Value = 10

7. Napsauta hiiren kakkospainikkeella toista vaihtoehtoa (varmista, että Suunnittelutila on valittuna).

8. Valitse Näytä koodi.

9. Lisää seuraava koodirivi:

If OptionButton2.Value = True Then Range("D3").Value = 20

10. Napsauta arkin vaihtoehto-painikkeita (varmista, että Suunnittelutila ei ole valittuna).

Tulos:

Option-painike 1 Todellinen

Option Button 2 True

Vaikka joissakin tilanteissa voi olla hyödyllistä sijoittaa optiopainikkeita suoraan laskentatauluun, vaihtoehtoiset painikkeet ovat erityisen hyödyllisiä, kun ne asetetaan Userform-muotoon.

Lue myös: