ComboBox错误:无法设置Column属性。类型不匹配

时间:2015-02-16 12:59:11

标签: excel vba excel-vba combobox

我正在使用Excel VBA用户表单而我正在尝试填充ComboBox但我收到错误Could not set the Column property. Type mismatch.

ComboBoxColumnCount属性设置为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

调试器将With UF_Main行标记为违规行,但这只发生在第三个循环的开头(它应该循环1000次以上)。

在调试时突出显示该行时,会显示<Object variable or With block variable not set>

更改UserForm /控件中的任何属性没有其他任何操作。可能导致错误的原因是什么?

0 个答案:

没有答案