Question

我有一个Userform，其中需要根据条件从电子表格中的值更新许多文本框。我正在尝试使用vlookup来实现这一目标。用户在Combobox Name1中选择一个名称，然后userform应根据组合框中的名称填充以下内容

以下是代码：

Private Sub Name1_AfterUpdate()
'Lookup Values based on first control

    Me.DateEnc = Application.WorksheetFunction.VLookup(Me.Name1, Caselist.Range("Lookup"), 0, 0)
    Me.Status = Application.WorksheetFunction.VLookup((Me.Name1), Caselist.Range("Lookup"), 0, 2)
    Me.LastDate = Application.WorksheetFunction.VLookup((Me.Name1), Caselist.Range("Lookup"), 0, 3)
    Me.Phone = Application.WorksheetFunction.VLookup((Me.Name1), Caselist.Range("Lookup"), 0, 5)
    Me.Address = Application.WorksheetFunction.VLookup((Me.Name1), Caselist.Range("Lookup"), 0, 6)

End Sub

我收到以下错误：“运行时错误424，需要对象”，然后调试模式突出显示此行：

Me.DateEnc = Application.WorksheetFunction.VLookup(Me.Name1, Caselist.Range("Lookup"), 0, 0)

我的格式一定有问题。哦，“Lookup”是一个使用以下公式的动态范围：

= OFFSET（Caselist $ A $ 3 ,,, COUNTA（Caselist $ A $ 3：！$ A $ 500），9）

知道我在这里做错了吗？非常感谢您的回复

Userform VLookup

0 个答案: