excel 检查#NV(德语中的#N/A),但未找到

fhg3lkii  于 2023-06-07  发布在  其他
关注(0)|答案(1)|浏览(585)

我遇到了一个问题,而检查值#NV(德语版的#N/A)在我的VBA脚本。我正在检查D列中的所有活动单元格,但是即使有一个单元格的值为#NV,它也不会触发msgBox。总是收到A
运行时错误“13”类型不匹配。

Dim checkRange As Range
    Dim cell As Range
    Dim missingFound As Boolean

    Set checkRange = ActiveSheet.Range("D1:D" & ActiveSheet.Cells(Rows.Count, "D").End(xlUp).row)
    missingFound = False

    For Each cell In checkRange
        If cell.Value = "#NV" Then
            missingFound = True
            Exit For
        End If
    Next cell

    If missingFound Then
        MsgBox "Missing Value"   
    End If

我试着在同一个脚本中运行一个replace-function,将其设置为isEmpty,但它也没有找到值“#NV”。我还尝试了IsNA,得到一个运行时错误'438'。
先谢谢你了!

zc0qhyus

zc0qhyus1#

我自己拿的!
对于任何感兴趣的人来说,检查'IsError'是要走的路!

For Each cell In checkRange
    If IsError(cell.Value) Then
        missingFound = True
        Exit For
    End If
Next cell

相关问题