Във VBA можете да създадете CheckBox където потребителят може да постави или премахне отметката от опцията. Чекбокс често се използва в потребителски форми, но може да се използва и в работен лист. В този урок ще научите как да създадете квадратче за отметка, да получите потребителски избор във VBA и да го използвате в код.
Ако искате да научите как да създадете Listbox, щракнете тук: VBA Listbox
Ако искате да научите как да създадете Combobox, щракнете тук: VBA Combobox
Създайте отметка
За да поставите квадратче за отметка в работния лист, трябва да отидете на Раздел за програмисти, щракнете Вмъкване и под ActiveX Controls изберете Поле за отметка:
Изображение 1. Поставете квадратче за отметка в работния лист
Когато поставите отметка в квадратчето, което сте поставили, можете да кликнете върху Имоти под Раздел за програмисти:
Изображение 2. Променете свойствата на квадратчето за отметка
Тук можете да зададете различни свойства на квадратчето за отметка. За начало променихме атрибута Име да се cmbCheckbox. Сега можем да използваме квадратчето с това име във VBA кода.
Също така променихме текста, който се показва до квадратчето за отметка, на Съгласен с Условията. За да направите това, трябва да зададете атрибута Надпис.
Вземете избран елемент от квадратче за отметка във VBA
Целта на квадратче за отметка е да се даде избор на потребителите (отметнато или не). За да извлечете стойност, избрана от потребителя, трябва да използвате този код:
| 123456789 | Ако Sheet1.chbCheckBox.Value = Вярно ТогаваSheet1.Range ("C3") = "Съгласен"ИначеSheet1.Range ("C3") = "Не съм съгласен"Край Ако |
Искаме да попълним клетката C3 с Съгласен ако квадратчето за отметка е поставено и Не се съгласявайте в противен случай. Стойността на квадратчето за отметка е вСтойност атрибут на обекта Sheet1.chbCheckbox. Стойността на квадратчето може да е вярно или невярно.
Изображение 3. Вземете избрана стойност от квадратчето за отметка във VBA
Когато проверихме квадратчето, стойността на Sheet1.chbCheckbox.Value е вярно, така че резултатът в C3 е Съгласен.
Използвайте квадратче за отметка в потребителска форма
Както споменахме, чекбоксът най -често се използва в потребителските форми. За да обясним как можете да го направите, първо ще вмъкнем Userform. В редактора на VBA щракнете с десния бутон върху името на модула, щракнете върху Вмъкване и изберете UserForm:
Изображение 8. Поставете потребителска форма
За да се покажат контролите за вмъкване, трябва да активирате Кутия за инструменти. За да направите това, кликнете върхуКутия за инструменти икона в лентата с инструменти. След това ще получите прозорците с всички налични контроли. Можете да кликнете върху Поле за отметка за да го създадете в Userform:
Изображение 9. Поставете квадратче за отметка в Userform
В прозореца със свойства ще променим името на квадратчето за отметка на chbCheckBox и надпис към Съгласен с Условията. Когато стартираме Userform, получаваме квадратчето за отметка в него.
Изображение 10. Полето за отметка в Userform
Ако искате да получите избрана стойност от квадратчето за отметка, трябва да използвате същата логика за квадратчето за отметка в работен лист, което е обяснено по -рано в статията.
