遍历单元格如果遇到#N/A,用什么方法处理较好?

卷土重来问号

如题,我在尝试用on error goto的时候,失效了,还是会中断,并没有跳到我给他设定的goto语句

zhaogang1960

用IsError函数判断一下单元格是否错误：
Dim c As Range
For Each c In Range("A1").CurrentRegion
    If Not IsError(c.Value) Then MsgBox c.Value
Next

卷土重来问号

zhaogang1960 发表于 2016-3-8 17:29
用IsError函数判断一下单元格是否错误：
Dim c As Range
For Each c In Range("A1").CurrentRegion

谢谢!顺便问一下,If rng.Offset(0, -10).Value = "2015" And rng.Offset(0, -12).Value = "0301",用这个表达式有没有问题?

zhaogang1960

卷土重来问号 发表于 2016-3-8 21:02
谢谢!顺便问一下,If rng.Offset(0, -10).Value = "2015" And rng.Offset(0, -12).Value = "0301",用这个 ...

If Not IsError(rng.Offset(0, -10).Value) And Not IsError(rng.Offset(0, -12).Value) Then '首先确保这两个单元格没有错误值
    If rng.Offset(0, -10).Value = "2015" And rng.Offset(0, -12).Value = "0301" Then MsgBox "ok"
End If