/ / Excel VBA opciju pogas

Excel VBA opciju pogas

Ja jums ir pogas ar vairāk nekā vienu opciju, var izvēlēties tikai vienu no opciju pogām. Radīt opciju pogas in Excel VBA, izpildiet sekojošus soļus.

1. Cilnē Izstrādātājs noklikšķiniet uz Ievietot.

2. ActiveX Controls grupā noklikšķiniet Option Button.

Izveidojiet opcijas pogu Excel VBA

3. Velciet divas opcijas pogas savā darblapā.

4. Ar peles labo pogu noklikšķiniet uz pirmās opcijas pogas (pārliecinieties, vai ir atlasīts dizaina režīms).

5. Noklikšķiniet uz Skatīt kodu.

Skatīt kodu

Piezīme: jūs varat mainīt kontroles virsrakstu un nosaukumu, ar peles labo pogu noklikšķinot uz vadības pogas (pārliecinieties, vai ir atlasīts dizaina režīms) un pēc tam noklikšķinot uz Properties (Rekvizīti). Mainiet izvēles pogas parakstus uz "Sieviete un vīrietis". Tagad opciju pogu nosaukumi tiks atstāti OptionButton1 un OptionButton2.

6. Pievienojiet šādu koda rindiņu:

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

7. Ar peles labo pogu noklikšķiniet uz otrās opcijas pogu (pārliecinieties, ka ir atlasīts režīma režīms).

8. Noklikšķiniet uz Skatīt kodu.

9. Pievienojiet šādu koda rindiņu:

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

10. Noklikšķiniet uz opcijas pogām lapā (pārliecinieties, ka Design Mode nav atlasīts).

Rezultāts:

Opcijas poga 1 True

Opcijas poga 2 Patiesa

Lai gan dažās situācijās var būt noderīgi tieši iekļaut opciju pogas savā darblapā, opciju pogas ir īpaši noderīgas, kad tās tiek ievietotas lietotāja formā.

Lasīt arī: