使用vba获取activexcombobox的选定值

如何获得combobox的选定值？

我有一个combobox有价值：“公司”和“消费者”。

我想获取我select的值，而不是索引，并存储在一个string中。

像这样的东西：

string a = combobox.value; 

（a – >消费者）

谢谢

Answer 1

如果你的ComboBox被embedded到电子表格中，你可以使用这个：

 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在VBA中有一个大写字母“V”，但是假设combobox是你在屏幕上创build的combobox的名字，你所拥有的代码将会工作（除了你的赋值语句是错误的，见下文）。 如果您不知道ComboBox的名称是什么，那很可能是ComboBox1 。 要查看，请查看VBA属性窗口中的Name属性。

尝试这个：

 Dim a as String a = combobox.Value