使用vba获取activex组合框的选定值

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