使用 VBA 以编程方式忽略 Excel 中的“数字存储为文本”错误答案

【问题标题】：Ignore 'Number Stored as Text' Error in Excel programmatically using VBA使用 VBA 以编程方式忽略 Excel 中的“数字存储为文本”错误
【发布时间】：2013-08-21 11:18:58
【问题描述】：

我想在单元格中存储诸如“001234”之类的文本。我已将此单元格的数字格式设置为文本。存储后，单元格左上角会以绿色三角形的形式显示错误“数字存储为文本”。这非常令人不安，我希望以编程方式将其删除。

【问题讨论】：

标签： excel error-handling vba

【解决方案1】：

考虑：

Sub Macro1()
    Application.ErrorCheckingOptions.NumberAsText = False
End Sub

当我开始在新计算机上工作时，这是一个更大的宏中的一行，用于配置 Excel。

【讨论】：

+1 我不久前尝试寻找。以下内容对我不起作用：Application.Range(Item.Address).Errors.Item(xlNumberAsText).Ignore = True。谢谢！
@Brian 查看我的编辑

【解决方案2】：

或者，您可以将单元格格式化为 000000 以显示前导 0，而不是将单元格格式化为文本。

【讨论】：

将数字存储为文本可能是有充分理由的，例如使用 VLOOKUP 等进行匹配。

【解决方案3】：

您可以选择您想要工作的范围，然后输入例如（现在添加语音标记）：

Range("A1:Z20").Application.ErrorCheckingOptions.NumberAsText = False

【讨论】：

这似乎对整个工作簿都关闭了它，而不是将其限制在特定范围内。
我同意你的看法，因为 Range 对象有一个 Application 属性，它引用了该范围所在的应用程序。该行本质上与键入 Application.ErrorCheckingOptions.NumberAsText = False 相同

【解决方案4】：

以上示例关闭了应用程序的“数字存储为文本”检查。

此代码将为特定单元格关闭它：

range("G93").Errors.Item(xlnumberastext).Ignore = True

【讨论】：