/ / Бутони за избор на VBA Excel

Бутони за избор на VBA за Excel

Ако имате повече от един бутон за избор, може да бъде избран само един от бутоните за избор. Да създам бутони с опции в Excel VBA, изпълнете следните стъпки.

1. В раздела Разработчик кликнете върху Вмъкване.

2. В групата ActiveX Controls щракнете върху бутона Option.

Създайте бутон за избор в Excel VBA

3. Плъзнете два бутона за избор на работен лист.

4. Щракнете с десния бутон върху първия бутон на опцията (уверете се, че е избран режим на проектиране).

5. Щракнете върху Преглед на кода.

Преглед на кода

Забележка: можете да промените надписите и името на контрола, като щракнете с десния бутон върху контрола (уверете се, че е избран режим на проектиране) и след това кликнете върху Properties (Свойства). Променете надписите на бутоните за опции на женски и мъжки. Засега ще оставим OptionButton1 и OptionButton2 като имената на бутоните за опции.

6. Добавете следния код:

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

7. Кликнете с десния бутон на втория бутон на опцията (уверете се, че е избран режим на проектиране).

8. Щракнете върху Преглед на кода.

9. Добавете следния ред на кода:

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

10. Щракнете върху опционалните бутони на листа (уверете се, че режимът на проектиране не е избран).

Резултат:

Бутон за избор 1 Истина

Бутон за избор 2 Вярно

Въпреки че в някои ситуации може да е полезно директно да поставите бутоните за избор на вашия работен лист, бутоните с опции са особено полезни, когато са поставени върху Userform.

Също така се чете: