VBA Excel 不会忽略 "Number Stored as Text" 错误

Question

我觉得Excel快变老了

我这辈子都无法让 Excel VBA 宏忽略 "Number Stored as Text" 错误。

在名为 "Main," 的工作表上的单元格 C71 中，我的值为 6135413313，Excel 警告是一个存储为文本的数字。它应该是。但是我想删除宏末尾那个烦人的小三角形。

出于测试目的，我已将我的宏代码缩减为最基本的代码，但该三角形仍然存在。这是我的宏：

Sub test()
    Range("C71").Errors(xlEvaluateToError).Ignore = True
End Sub

这怎么没有让那个错误消失？我也试过 Range("Main!C71")。那也没用。

这应该是非常容易的，但是那一行代码仍然不起作用。有什么想法吗？

Answer 1

循环遍历范围内的每个单元格以测试 xlNumberAsText 错误并设置忽略标志有效（尽管如果您有大量单元格，这可能会很慢）。

Sub test2()
    Call turnOffNumberAsTextError(Sheets("Main").Range("C71"))
End Sub

Sub turnOffNumberAsTextError(rge As Range)
    Dim rngCell As Range
    For Each rngCell In rge.Cells
        With rngCell
            If .Errors.Item(xlNumberAsText).Value Then
                .Errors.Item(xlNumberAsText).Ignore = True
            End If
        End With
    Next rngCell
End Sub

Answer 2

你可以试试这个

Sub test()
Sheets("Main").Range("C71").Errors(xlNumberAsText).Ignore = True
End Sub

或

Sub test()
Sheets("Main").Range("C71").Value = Sheets("Main").Range("C71").Value
End Sub

或

另一种方法是您可以手动禁用后台错误检查。
您可以通过单击 File - Excel Options - Formulas 并取消选中选项

它将禁用所有单元格的错误检查

background error checking

VBA Excel 不会忽略 "Number Stored as Text" 错误

VBA Excel Won't Ignore "Number Stored as Text" Error

vba

excel

cells