That would be indicative of
A: bad arguments
B: the value was not found.

Try this

Target.Offset(0, 1).Value = Application.VLookup(target_string,
D_PELATES, 2, 0)

If that doesn't solve it then another guess on the problem is then D_Pelates
is actually a named range. Then it would be:


Target.Offset(0, 1).Value = Application.VLookup(target_string,
Range("D_PELATES"), 2, 0)

--
Regards,
Tom Ogilvy


"DoctorG" wrote:

Target.Offset(0, 1).Value = WorksheetFunction.VLookup(target_string,
D_PELATES, 2, 0) produces the above error. Any ideas?