设置组合框行源VBA返回错误“ 1004”

时间:2019-03-21 10:31:16

标签: excel vba

我正在尝试在Excel VBA中为组合框设置行源,但返回错误

  

对象“ _Global”的1004方法“范围”失败。

Private Sub UserForm_Initialize()

    Dim rngVendor As Range

    Set rngVendor = Worksheets("Lists").Range("N2:N" & _
    Range("N2").End(xlDown).Row)

    frmNewVendor.cboVendor.RowSource = Range(rngVendor)

End Sub

1 个答案:

答案 0 :(得分:2)

rngVendor被声明为范围,因此不需要Range函数

 frmNewVendor.cboVendor.RowSource = rngVendor