combobox错误:无法设置列属性。 types不匹配
我正在使用Excel VBA UserForms,并试图填充ComboBox
但我收到错误Could not set the Column property. Type mismatch.
Could not set the Column property. Type mismatch.
ComboBox
的ColumnCount
属性设置为3
。
我使用下面的代码来填充ComboBox
:
Dim i As Long Dim varList As Variant With UF_Main 'Get CM list With .cbNAEmployee .Clear varList = fGetCMs If Not isArrayEmpty(varList) Then For i = LBound(varList, 2) To UBound(varList, 2) .AddItem varList(0, i) .Column(1, i) = varList(1, i) .Column(2, i) = varList(2, i) Next i End If End With End With
debugging器将With UF_Main
行标记为违规行,但这只发生在第三个循环的开始处(它应循环1000次以上)。
在debugging时突出显示该行时,显示<Object variable or With block variable not set>
。
没有任何其他更改UserForm / controls中的任何属性。 什么可能导致错误?