Errors 对象

         
Range
Errors
Error

表示某个区域的各种电子表格错误。

Errors 对象的用法

使用 Range 集合的 Errors 属性可返回一个 Errors 对象。

返回一个 Errors 对象之后,可使用 Error 对象的 Value 属性来检测特定的错误检查条件。下例在单元格 A1 中放置文本格式的数字,然后当单元格 A1 的值包括文本数字时通知用户。

Sub ErrorValue()

    ' Place a number written as text in cell A1.
    Range("A1").Formula = "'1"

    If Range("A1").Errors.Item(xlNumberAsText).Value = True Then
        MsgBox "Cell A1 has a number as text."
    Else
        MsgBox "Cell A1 is a number."
    End If

End Sub