TextDate 属性

如果该值为 True（默认值），则 Microsoft Excel 将用“自动更正选项”按钮识别包含用两位数字表示年份的文本日期的单元格。如果该值为 False，则禁用此类单元格的错误检查。Boolean 类型，可读写。

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

下例中，“自动更正选项”按钮将出现在单元格 A1 旁，该单元格包含用两位数字表示年份的文本日期。

Sub CheckTextDate()

    ' Simulate an error by referencing a text date with a two-digit year.
    Application.ErrorCheckingOptions.TextDate = True
    Range("A1").Formula = "'April 23, 00"

End Sub