如何使用vba来判断Excel工作表上的Active Xcombobox是否有列表

如何使用vba来判断Excel工作表上的Active Xcombobox是否包含列表中的项目。

如果combobox中没有任何内容，则返回错误：

if UBound(MyComboBox.List, 1) > 1 then 

如果列表中有项目，则以下内容将返回错误：

 if MyComboBox.List <> Null then 

干杯!

奥利弗。

Answer 1

下面的代码检查ComboBox1中是否有项目，并列出它find的所有项目：

 Dim lngRow As Long If ComboBox1.ListCount > 0 Then For lngRow = 0 To ComboBox1.LineCount - 1 Debug.Print ComboBox1.List(lngRow , 0) Next intRow End If