在循环内使用vlookup查找缺失值

Question

我想我接近解决这个问题，或者至少我希望，但我很难过。这是我的代码：

For Each rCell In DErange
    lookup = Application.WorksheetFunction.VLookup(rCell, DEUrange, 1, False)
    If rCell <> lookup Then
        IRlastrow = IssueReport.Range("A" & Rows.Count).End(xlUp).Row
        IssueReport.Range("A" & IRlastrow).Value = lookup
    End If
Next rCell

我的最终目标是将每个rCell都放在DErange中，在DEUrange中查找，如果它丢失了，请将它添加到IssueReport工作表中。

问题是，如果vlookup找不到匹配项，VBA会抛出错误代码。我希望它只能分配一个＆＃34; #N / A＆＃34;或者我的字符串查找的一些错误消息。

思想？