跳到主要內容

如何在 Excel 中隱藏特定的錯誤值?

假設您的 Excel 工作表中存在不需要更正但需要隱藏的錯誤值。 為了解決這個問題,我們討論了 如何隱藏Excel中的所有錯誤值,現在,如果您只想隱藏特定的錯誤值怎麼辦? 在本教程中,我們將向您展示如何通過以下三種方式完成這項工作。


通過使用 VBA 將文本變為白色來隱藏多個特定的錯誤值

我們創建了兩個 VBA 代碼,通過將指定錯誤的字體顏色變為白色,幫助您快速隱藏選定範圍內或跨多個工作表的多個特定錯誤值。 請按照以下步驟並根據您的需要運行代碼。

1. 在 Excel 中,按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

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。 在 庫工具 標籤,在 公式 組,單擊 更多 > 錯誤條件嚮導.

2.在彈出窗口中 錯誤條件嚮導 對話框,請執行以下操作:
  • 範圍 框,單擊範圍選擇按鈕 在右側指定包含要隱藏的錯誤的範圍。 注意: 要搜索整個工作表,請單擊工作表選項卡。
  • 錯誤類型 部分,指定要隱藏的錯誤值。
  • 錯誤顯示 部分,選擇一種方法來替換錯誤。

3。 點擊 Ok. 指定的錯誤值顯示為您選擇的選項。

注意: 要使用 錯誤條件嚮導 功能,您應該在您的計算機中安裝 Kutools for Excel。 如果您沒有安裝 Kutools, 點擊此處下載並安裝. 專業的 Excel 插件提供 30 天無限制免費試用。


使用公式將特定錯誤替換為其他值

要替換特定的錯誤值,Excel 的 IF, 干擾素錯誤類型 功能可以幫你一個忙。 但首先,您應該知道每個錯誤值對應的數字代碼。

# 錯誤 公式 歸還
#空值! = 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 人工智慧助手:基於以下內容徹底改變數據分析: 智慧執行   |  生成代碼  |  建立自訂公式  |  分析數據並產生圖表  |  呼叫 Kutools 函數...
熱門特色: 尋找、突出顯示或識別重複項   |  刪除空白行   |  合併列或儲存格而不遺失數據   |   沒有公式的回合 ...
超級查詢: 多條件VLookup    多值VLookup  |   跨多個工作表的 VLookup   |   模糊查詢 ....
高級下拉列表: 快速建立下拉列表   |  依賴下拉列表   |  多選下拉列表 ....
欄目經理: 新增特定數量的列  |  移動列  |  切換隱藏列的可見性狀態  |  比較範圍和列 ...
特色功能: 網格焦點   |  設計圖   |   大方程式酒吧    工作簿和工作表管理器   |  資源庫 (自動文字)   |  日期選擇器   |  合併工作表   |  加密/解密單元格    按清單發送電子郵件   |  超級濾鏡   |   特殊過濾器 (過濾粗體/斜體/刪除線...)...
前 15 個工具集12 文本 工具 (添加文本, 刪除字符,...)   |   50+ 圖表 類型 (甘特圖,...)   |   40+ 實用 公式 (根據生日計算年齡,...)   |   19 插入 工具 (插入二維碼, 從路徑插入圖片,...)   |   12 轉化 工具 (數字到單詞, 貨幣兌換,...)   |   7 合併與拆分 工具 (高級合併行, 分裂細胞,...)   |   ... 和更多

使用 Kutools for Excel 增強您的 Excel 技能,體驗前所未有的效率。 Kutools for Excel 提供了 300 多種進階功能來提高生產力並節省時間。  點擊此處獲取您最需要的功能...

產品描述


Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations