2014-12-25 32 views
-1

我试图根据员工ID在用户窗体中使用VLOOKUP公式提取员工姓名。用户窗体VLOOKUP无法正常工作

下面的代码工作。

Private Sub CommandButton2_Click()   
    Label4.Caption = Sheet1.Application.WorksheetFunction.VLookup(TextBox1.Text, Range("A:B"), 2, False) 
    End Sub 
+0

有什么问题?它不工作?添加一些内容到您的问题 – jbkkd

+0

是它不起作用它给我这个消息“无法获得工作表功能类的vlookup属性”错误1004 –

+1

请参阅Doug Glancy的评论在这里http://stackoverflow.com/questions/18063214/how -to-error-handle-1004-error-with-worksheetfunction-vlookup – brettdj

回答

-1

这里的挑战是没有找到匹配的时候。这是错误信息的原因。这里是您应该使用的VBA代码 :

Private Sub CommandButton2_Click() 
    On Error Resume Next 
    Label1.Caption = Sheet1.Application.WorksheetFunction.VLookup(TextBox1.Text, Range("A:B"), 2, False) 
    If Err.Number <> 0 Then 
     Err.Clear 
     Label1.Caption = "not found" 
    End If 
End Sub 
+2

感谢男人给予时间和帮助我解决问题,其实输入你添加的内容非常感谢,但这也不能解决我的问题mi can' t看看label1中显示的结果,说明excel文件可能有问题请注意,sheet1称为sheet1,我的员工ID是A,名称是B,我创建了一个用户表单,其中有一个文本框,标签和一个按钮。基本上我想让最终用户编写员工ID,然后点击按钮并在标签中显示结果。有人可以帮忙吗? –

+0

这就是代码需要照顾的。我假设它在用户窗体模块中,对吗?我按照你所描述的重新创建了它,它只是起作用。我想不出有什么办法可以阻止你像我一样获得同样的结果。疑难解答,疑难解答,疑难解答......这是票证。祝你好运。 –