Sorry, I mistyped a line of code, my code is as follows:

Function vlook(cell,range,column)
vlook = Application.WorksheetFunction.vlookup(cell,range,c olumn,FALSE)
if Application.WorksheetFunction.IsError(vlook) = TRUE then vlook = ""
End Function



"Mike Rediger" wrote in message
news:5UQBb.6442$US3.1042@okepread03...
I use Vlookup extensively and attempted to add a new function, Vlook.

The function should 1) set the 4th argument to false, and 2) return an
empty
string if the regular formula would return an error.

#2 is what I'm having a problem with.

Here's my code

Function vlook(cell,range,column)
vlook = Application.WorksheetFunction.vlookup(cell,range,c olumn,FALSE)
if Application.WorksheetFunction.IsError(vlook) then vlook = ""
End Function


The code works for non-errors, however, returns #VALUE! instead of "" if
the
formula cannot be resolved.

Help!