如何在 Excel 中隐藏特定的错误值?
假设您的 Excel 工作表中存在不需要更正但需要隐藏的错误值。 为了解决这个问题,我们讨论了 如何隐藏Excel中的所有错误值,现在,如果您只想隐藏特定的错误值怎么办? 在本教程中,我们将向您展示如何通过以下三种方式完成这项工作。
通过使用 VBA 将文本变为白色来隐藏多个特定的错误值
使用错误条件向导功能将特定错误值替换为其他值
使用公式将特定错误替换为其他值
通过使用 VBA 将文本变为白色来隐藏多个特定的错误值
我们创建了两个 VBA 代码,通过将指定错误的字体颜色变为白色,帮助您快速隐藏选定范围内或跨多个工作表的多个特定错误值。 请按照以下步骤并根据您的需要运行代码。
1. 在 Excel 中,按 其他 + F11 键打开 Microsoft Visual Basic应用程序 窗口。
2。 点击 插页 > 模块. 然后将以下任一 VBA 代码复制到 模块
窗口。
VBA 代码 1:隐藏所选范围内的多个特定错误值
Updated by ExtendOffice 20220824
Dim xRg As Range
Dim xFindStr As String
Dim xFindRg As Range
Dim xARg As Range
Dim xURg As Range
Dim xFindRgs As Range
Dim xFAddress As String
Dim xBol As Boolean
Dim xJ
xArrFinStr = Array("#DIV/0!”, “#N/A”, “#NAME?") Enter the errors to hide, enclose each with double quotes and separate them with commas
On Error Resume Next
Set xRg = Application.InputBox("Please select the range that includes the errors to hide:", "Kutools for Excel", , Type:=8)
If xRg Is Nothing Then Exit Sub
xBol = False
For Each xARg In xRg.Areas
Set xFindRg = Nothing
Set xFindRgs = Nothing
Set xURg = Application.Intersect(xARg, xARg.Worksheet.UsedRange)
For Each xFindRg In xURg
For xJ = LBound(xArrFinStr) To UBound(xArrFinStr)
If xFindRg.Text = xArrFinStr(xJ) Then
xBol = True
If xFindRgs Is Nothing Then
Set xFindRgs = xFindRg
Else
Set xFindRgs = Application.Union(xFindRgs, xFindRg)
End If
End If
Next
Next
If Not xFindRgs Is Nothing Then
xFindRgs.Font.ThemeColor = xlThemeColorDark1
End If
Next
If xBol Then
MsgBox "Successfully hidden."
Else
MsgBox "No specified errors were found."
End If
End Sub
请注意: 在片段中 xArrFinStr = Array("#DIV/0!", "#N/A", "#NAME?") 在第 12 行,你应该替换 “#DIV/0!”、“#N/A”、“#NAME?” 对于要隐藏的实际错误,请记住用双引号将每个值括起来并用逗号分隔它们。
VBA 代码 2:隐藏多个工作表中的多个特定错误值
Sub HideSpecificErrors_WorkSheets()
Updated by ExtendOffice 20220824
Dim xRg As Range
Dim xFindStr As String
Dim xFindRg As Range
Dim xARg, xFindRgs As Range
Dim xWShs As Worksheets
Dim xWSh As Worksheet
Dim xWb As Workbook
Dim xURg As Range
Dim xFAddress As String
Dim xArr, xArrFinStr
Dim xI, xJ
Dim xBol As Boolean
xArr = Array("Sheet1", "Sheet2") Names of the sheets where to find and hide the errors. Enclose each with double quotes and separate them with commas
xArrFinStr = Array("#DIV/0!", "#N/A", "#NAME?") Enter the errors to hide, enclose each with double quotes and separate them with commas
On Error Resume Next
Set xWb = Application.ActiveWorkbook
xBol = False
For xI = LBound(xArr) To UBound(xArr)
Set xWSh = xWb.Worksheets(xArr(xI))
Set xFindRg = Nothing
xWSh.Activate
Set xFindRgs = Nothing
Set xURg = xWSh.UsedRange
Set xFindRgs = Nothing
For Each xFindRg In xURg
For xJ = LBound(xArrFinStr) To UBound(xArrFinStr)
If xFindRg.Text = xArrFinStr(xJ) Then
xBol = True
If xFindRgs Is Nothing Then
Set xFindRgs = xFindRg
Else
Set xFindRgs = Application.Union(xFindRgs, xFindRg)
End If
End If
Next
Next
If Not xFindRgs Is Nothing Then
xFindRgs.Font.ThemeColor = xlThemeColorDark1
End If
Next
If xBol Then
MsgBox "Successfully hidden."
Else
MsgBox "No specified errors were found."
End If
End Sub
请注意:
在片段中 xArr = Array("Sheet1", "Sheet2") 在第 15 行,你应该替换 “表 1”、“表 2” 使用要隐藏错误的工作表的实际名称。 请记住用双引号将每个工作表名称括起来,并用逗号分隔它们。
在片段中 xArrFinStr = Array("#DIV/0!", "#N/A", "#NAME?") 在第 16 行,你应该替换 “#DIV/0!”、“#N/A”、“#NAME?” 对于要隐藏的实际错误,请记住用双引号将每个错误括起来并用逗号分隔它们。
3。 按 F5 运行 VBA 代码。 请注意: 如果您使用了 VBA代码1,将弹出一个对话框,要求您选择查找和删除错误值的范围。 您还可以单击工作表选项卡以选择整个工作表。
4. 弹出如下对话框,告诉您指定的错误值已被隐藏。 点击 OK
关闭对话框。
5. 指定的错误值已被立即隐藏。
使用错误条件向导功能将特定错误值替换为其他值
如果您不熟悉 VBA 代码, Kutools for Excel的错误条件向导功能可以帮助您轻松找到所有错误值、所有#N/A 错误或除#N/A 之外的任何错误,并将它们替换为您指定的其他值,请继续阅读以了解如何获取这项工作完成了。
1。 在 Kutools 标签,在 公式 组,点击 更多 > 错误条件向导
.
2.在弹出窗口中 错误条件向导 对话框,请执行以下操作:
在 Range 框,单击范围选择按钮 在右侧指定包含要隐藏的错误的范围。 请注意: 要搜索整个工作表,请单击工作表选项卡。
在 错误类型 部分,指定要隐藏的错误值。
在 错误显示 部分,选择一种方法来替换错误。
3。 点击 Ok
. 指定的错误值显示为您选择的选项。
请注意: 要使用 错误条件向导 功能,你应该有 Kutools for Excel 安装在您的计算机中。 如果你没有 Kutools 安装后, 点击这里下载并安装. 专业的 Excel 插件提供 30 天免费试用,没有任何限制。
使用公式将特定错误替换为其他值
要替换特定的错误值,Excel 的 IF, 干扰素及 ERROR.TYPE 功能可以帮你一个忙。 但首先,您应该知道每个错误值对应的数字代码。
# 错误
公式
退货政策
#空值!
= ERROR.TYPE(#NULL!)
1
#DIV / 0!
= ERROR.TYPE(#DIV / 0!)
2
#值!
= ERROR.TYPE(#VALUE!)
3
#REF!
= ERROR.TYPE(#REF!)
4
#NAME?
= ERROR.TYPE(#NAME?)
5
#NUM!
= ERROR.TYPE(#NUM!)
6
#N / A
= ERROR.TYPE(#N / A)
7
#获取
数据
= ERROR.TYPE(#GETTING_DATA)
8
#洒!
=错误类型(#溢出!)
9
#未知!
=错误类型(#未知!)
12
#场地!
=错误类型(#FIELD!)
13
#计算!
=错误类型(#CALC!)
14
还要别的吗
= ERROR.TYPE(123)
#N / A
例如,您有一个包含如上所示值的表。 更换 #DIV / 0! 文本字符串错误 除以零误差,你应该先找到这个错误的代码,也就是 2. 然后在单元格中应用以下公式 B2,然后向下拖动填充柄以将公式应用于以下单元格:
=IF(IFNA(ERROR.TYPE(A2),A2)=2,"除以零误差",A2)
请注意:
在公式中,您可以替换错误代码 2 到其他错误值对应的代码。
在公式中,您可以替换文本字符串 “除以零错误” 到其他短信,或 "" 如果您想用空白单元格替换错误。
相关文章
如何在 Excel 中隐藏所有错误值?
在使用Excel工作表时,有时,您可能会发现一些错误值,例如#DIV / 0,#REF,#N / A等,它们是由公式错误引起的。 现在,您想在工作表中隐藏所有这些错误值,如何在Excel中快速轻松地解决此任务?
如何更改#DIV/0! Excel中的可读消息错误?
有时,当我们使用公式在excel中进行计算时,会显示一些错误消息。 例如,在此公式= A1 / B1中,如果B1为空或包含0,则该公式将显示#DIV / 0错误。 有什么方法可以使这些错误消息清晰可读,或者如果您想使用其他消息来替换错误,该怎么办?
删除Excel中的行时如何避免#Ref错误?
当您将一个单元格引用到另一个单元格时,如果删除了引用行,则该单元格将显示#REF错误,如下图所示。 现在,我将讨论如何避免#ref错误并在删除行时自动引用下一个单元格。
如何突出显示 Excel 中的所有错误单元格?
如果您在工作表中创建公式,则不可避免地会出现一些错误值。 您能否一次突出显示工作表中包含错误值的所有这些单元格? Excel 中的条件格式实用程序可以帮助您解决此问题。
最佳办公生产力工具
将小时转化为分钟 Kutools for Excel!
准备好增强您的 Excel 任务了吗? 利用的力量 Kutools for Excel - 您终极的节省时间的工具。 简化复杂的任务并像专业人士一样浏览数据。 以闪电般的速度体验 Excel!
为什么需要 Kutools for Excel
🛠️ 超过 300 项强大功能: Kutools 包含 300 多项高级功能,可简化您在 1500 多种场景中的工作。
📈 卓越的数据处理能力:合并单元格、删除重复项并执行高级数据转换 - 所有这些都不费吹灰之力!
⏱️ 高效的批量操作:当你可以聪明地工作时,为什么还要付出额外的努力呢? 轻松批量导入、导出、组合和调整数据。
📊 可定制的图表和报告:访问各种附加图表并生成富有洞察力的报告。
🗄️ 强大的导航窗格:通过强大的列管理器、工作表管理器和自定义收藏夹获得优势。
📝 七种类型的下拉列表:通过各种功能和类型的下拉列表使数据输入变得轻而易举。
🎓 用户友好:对于初学者来说轻而易举,对于专家来说是一个强大的工具。
立即下载,与 Excel 一起穿越时空!
阅读更多
免费下载... 采购...
Office Tab 为 Office 带来选项卡式界面,让您的工作更轻松
在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
每天将您的工作效率提高50%,并减少数百次鼠标单击!