Userform display a message when vlookup does not found matching data or does not return a match.

[Lokoloko]

Guys i keep getting error when textbox value didn't find any value on a range, anyone knows how fix this.

Private sub textbox1_AfterUpdate()

If textbox1.value = Worksheetfunction.Vlookup(textbox1,Sheet1.Range("A:A") , 1, False) then
Msgbox "Data Found"
Else
Msgbox "No Data Found"
End if

End sub

 

[Fluff]

Duplicate to: Userform display a message when vlookup does not find data in textbox or does not return a match

In future, please do not post the same question multiple times. Per Forum Rules (#12), posts of a duplicate nature will be locked or deleted.

In relation to your question here, I have closed this thread so please continue in the linked thread.