使用工作表中的数据填写我的用户表单

时间:2019-11-21 18:18:02

标签: excel vba

我在用户表单中编写了一些代码,这些代码采用了我的用户表单中IDnumber字段的值。如果ID号已经在工作表中注册,我希望它根据ID号的搜索结果填写所有其他字段,并且在该号不存在的情况下应显示一条错误消息。我已经编写了一些代码,但是在创建IF then语句时遇到了麻烦,该语句可以找到我在数据工作表的用户窗体中键入的值。截至目前,它给了我一个编译错误,否则如果没有人知道如何解决这个问题?下面是我的代码,方便查看。

 Dim IDNUM As Range



IDNUM = Worksheets("Petrobras").Range("V:V").Find(TXTOPPNUM_Insert.Value, , , LookAt:=xlWhole).Value

If IDNUM Is Null Then MsgBox "This Opportunity has Not Been Registered Yet"
Else:
ActiveCell.Offset(0, -21).Activate.ActiveCell.EntireRow.Select
End If

0 个答案:

没有答案