Excel VBA使用vlookup出现1004出错处理办法

Vlookup 在Excel中查找大量数据时效率是很高的,在Excel中广泛的被使用着。

vlookup 查找时如找到不到匹配项会返回#N/A 的错误，这点在工作表中是很友好的，但是在VBA中使用vlookup时不会返回这个错误值，而且是抛出1004错误，所以在使用是要标记它。

示例代码：

Function check_code(code) As Boolean If code <> Empty Then code = code & "" On Error Resume Next u = WorksheetFunction.VLookup(code, Sheet3.Range("$A$2:$E$" & Sheet3.UsedRange.Rows.Count), 2, 0) If Err.Number <> 0 Then check_code = False Exit Function End If End If check_code = True End Function

On Error Resume Next 表示如果下面的代码出现错误则执行错误行的下行代码。