excel - 无法从电子表格中剔除一些不需要的值

Question

我用 vba 编写了一个脚本来清除任何包含 #NAME? 的单元格。但是，每次运行以下宏时，我都会收到此 cel.value=Error 2029。

我尝试过:

Sub ClearUnwantedRange()
    Dim cel As Range

    For Each cel In ActiveSheet.UsedRange.CurrentRegion
        If InStr(cel, "#")  > 0 Then
            Debug.Print cel.Address
            cel.ClearContents
        End If
    Next cel
End Sub

我什至尝试过 If InStr(cel, "#NAME?") > 0 Then 但没有运气。

How can I kick those unwanted values out?

Answer 1

试试这个...

If IsError(cel) Then

...而不是...

If InStr(cel, "#")  > 0 Then