小编use*_*307的帖子

我正在尝试开发一个表单来跟踪发票的进入.表单将有一个组合框,我可以点击并选择供应商编号.我希望文本框根据从组合框中选择的供应商编号自动填写.这是我到目前为止所拥有的:

Private Sub ComboBox1_Change()    
    'Vlookup when ComboBox1 is filled
    Me.TextBox1.Value = Application.WorksheetFunction.VLookup( _
        Me.ComboBox1.Value, Worksheets("Sheet3").Range("Names"), 2, False)    
End Sub

工作表3是从中提取信息的(供应商编号和名称).

当我回到表单来测试代码时,我收到以下错误:

运行时错误'1004':无法获取WorksheetFunction类的VLookup属性

我该如何解决？