Создание выпадающего с флажками

У меня есть пользовательская форма, и я хотел бы создать Combobox и иметь флажки в нем. Моя цель - выбрать несколько вариантов одновременно и показать их.

Я хотел бы иметь что-то вроде этого:

[1

Возможно ли это и как я могу это сделать?

Любое руководство будет полезно.

Источник

2 ответа

Решение

Я думаю, что это невозможно с выпадающим списком. Но вы могли бы сделать это с помощью ListBox

Для этого вы должны установить свойства для списка:

Если у вас есть это, ваша форма будет заблокирована следующим образом:

Источник

Вы можете использовать Listbox только с Multiselect (см. Следующий код для проверки):

Private Sub UserForm_Initialize()
    ListBox1.AddItem "All"
    ListBox1.AddItem "Project Manager"
    ListBox1.AddItem "Project Scientist"
    ListBox1.AddItem "Software Developer"
End Sub

Private Sub Format_Listbox1()
    ListBox1.MultiSelect = fmMultiSelectMulti
    ListBox1.ListStyle = fmListStyleOption
End Sub

Для эффекта DropDown вы можете добавить изображение или текстовое поле для изменения высоты Listbox1....

Источник
Другие вопросы по тегам