/ / Excel VBA opcionális gombok

Excel VBA opcionális gombok

Ha több opció gomb van, akkor csak az egyik opciógombot lehet kiválasztani. Készíteni opciógombokat ban ben Excel VBAhajtsa végre a következő lépéseket.

1. A Fejlesztő lapon kattintson a Beszúrás gombra.

2. Az ActiveX vezérlők csoportban kattintson az Option gombra.

Hozzon létre egy opciógombot az Excel VBA programban

3. Húzza két opciógombot a munkalapon.

4. Jobb egérgombbal kattintson az első opciógombra (győződjön meg arról, hogy a Design Mode van kiválasztva).

5. Kattintson a Kód megtekintése parancsra.

Kód megtekintése

Jegyzet: megváltoztathatja a felirat és a vezérlő nevét a jobb egérgombbal történő kattintással (győződjön meg arról, hogy a Tervezési mód van kiválasztva), majd kattintson a Tulajdonságok gombra. Módosítsa az opciógombok feliratait Nőre és Férfira. Mostantól az OptionButton1 és az OptionButton2 opciókat választjuk az opciógombok neveként.

6. Adja hozzá a következő kódsor:

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

7. Kattintson a jobb egérgombbal a második opció gombra (győződjön meg arról, hogy a Design Mode van kiválasztva).

8. Kattintson a Kód megtekintése gombra.

9. Adja hozzá a következő kódot:

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

10. Kattintson a lapon található opciógombokra (győződjön meg róla, hogy a Design Mode nincs kiválasztva).

Eredmény:

Option 1 gomb Igaz

Option 2 gomb Igaz

Noha bizonyos helyzetekben hasznos lehet az opciógombok közvetlenül elhelyezése a munkalapon, az opciógombok különösen akkor hasznosak, ha Userformon vannak elhelyezve.

Szintén olvasható: