Получить выбранное значение выпадающего списка ActiveX с помощью VBA

Question

Как получить выбранное значение в выпадающем списке?

У меня есть выпадающий список со значениями: «Корпоративный» и «Потребительский».

Я хочу получить выбранное значение, а не индекс, и сохранить его в строке.

как то так:

 string a = combobox.value;

(a -> Потребитель)

спасибо

Answer 1

Если ваш ComboBox встроен в электронную таблицу, вы можете использовать это:

Dim ws as Worksheet
Dim cboCorpConsumer as ComboBox
Dim a as String

Set ws = Worksheets("YourWorksheetName")
Set cboCorpConsumer = ws.OLEObjects("cboNameFromActiveXProperties").Object

a = cboCorpConsumer.Value

или в одну строку:

a = Worksheets("YourWorksheetName").OLEObjects("cboNameFromActiveXProperties").Object.Value

Answer 2

Value имеет заглавную букву "V" в VBA, но если предположить, что combobox - это имя ComboBox, которое вы создали на экране, ваш код будет работать (за исключением того, что ваш оператор присваивания неверен; см. Ниже) , Если вы не знаете, как называется ComboBox, скорее всего, ComboBox1. Чтобы проверить, посмотрите на свойство Name в окне свойств VBA.

Попробуйте это:

Dim a as String

a = combobox.Value