I am using an VLookup and want to execute a specific action if the value is
not returned.

ans4 = Application.WorksheetFunction.VLookup(Range("C2"), Range("B6:D2000"),
3, False)
On Error Resume Next

If "AN ERROR HAS OCCURRED" Then
ans4 = "Value Not Defined"
End If

..Offset(1, 15).Value = ans4

How do I do this?

Thanks