EXCEL 中批量处理公式错误的单元格

最新推荐文章于 2026-06-08 11:23:13 发布

原创最新推荐文章于 2026-06-08 11:23:13 发布 · 2.3k 阅读

0 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#excel

收录于

VBA 开发专栏收录该内容

2 篇文章

订阅专栏

本文提供了一个VBA宏代码示例，用于处理Excel中常见的错误值显示问题，如#DIV/0!等，通过条件判断自动调整公式，隐藏错误信息。

常见的EXCEL文件中由于公式处理显示错误信息，例如，当公式中出现被零除的现象时,产生的错误值#DIV/0! ，还有其它的#NUM! 、#N/A! 等等，当有很多这种单元格时十分影响美观，下列宏代码用于处理这些错误信息的显示，使文件更人性化。

'i为文件中的sheet数 'j为处理区域高度（行数） 'k为处理区域宽度（列数），注意，超出Z列的文件 Dim i, j, k As Integer Dim cellName, func As String For i = 1 To 1 Sheets(i).Select For j = 1 To 50 For k = 65 To 90 ‘A-Z cellName = Chr(k) + CStr(j) Range(cellName).Select If Application.WorksheetFunction.IsError(ActiveCell.Value) Then func = ActiveCell.Formula func = Replace(func, "=", "") func = "=IF(ISERROR(" + func + "),""""," + func + ")" ActiveCell.Formula = func End If Next Next Next