无法从电子表格中排除一些不必要的值

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，但没有运气。

  

我该如何排除那些不需要的值？

Answer 1

尝试一下...

If IsError(cel) Then

...而不是...

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