VBA VLOOKUP when search value NOT FOUND

[MPastor]

I'm having a problem using VLOOKUP in VBA when the search value is "NOT FOUND". When this condition occurs, my macro issues Run-Time Error '13': Type Mismatch.

My code is as follows:

  vItemShortDesc = Application.VLookup(vCell.Value, Sheets("ITM").Range("C:D"), 2, False)

Any suggestions on how to program for and "handle" this Not Found condition???

 

[acw]

Mike

One way

Sub xxx()
 holder = ""
 On Error Resume Next
 holder = WorksheetFunction.VLookup("a", Range("a1:b3"), 2, False)
 On Error GoTo 0
 MsgBox holder
End Sub

Tony

 

[MPastor]

Tony, That's Great -- it did the trick.