在excel中使用find方法

时间:2015-07-08 07:03:46

标签: excel-vba error-handling find vba excel

我正在努力弄清楚如何找出在excel中找不到搜索字符串,我试过

isnothing(rFoundCell)

但这不起作用,说方法无法找到

并且iserror也不起作用

   For rCount = Settings.rowHeaderTempFile + 1 To lRow2
    Set rFoundCell = Range("A" & Settings.rowHeader + 1)
    Set rFoundCell = ws.Columns(1).Find(What:=ws2.Cells(rCount,
                     partNumberWs2).Value, After:=rFoundCell, 
                     LookIn:=xlValues, LookAt:=xlPart, 
                     SearchOrder:=xlByRows, SearchDirection:=xlNext,
                     MatchCase:=False)

    If IsError(rFoundCell.Row) Then ' fails here
        lRow = lRow + 1

1 个答案:

答案 0 :(得分:1)

由于{{error['salary.salary_id'][0]}} rFoundCell,因此它不具有Nothing属性。
.Row似乎更方便处理,但在现实生活中我不会使用处理,依赖程序应该基于If rFoundCell Is Nothing标准。

If Not rFoundCell Is Nothing Then