Vai al contenuto principale

Come nascondere valori di errore specifici in Excel?

Diciamo che ci sono valori di errore nel foglio di lavoro di Excel che non è necessario correggere ma nascondere. Per affrontare il problema, ne abbiamo parlato come nascondere tutti i valori di errore in Excel, ora, cosa succede se si desidera nascondere solo valori di errore specifici? In questo tutorial, ti mostreremo come portare a termine questo lavoro in tre modi di seguito.


Nascondi più valori di errore specifici trasformando il testo in bianco con VBA

Abbiamo creato due codici VBA per aiutarti a nascondere più valori di errore specifici nell'intervallo selezionato o su più fogli di lavoro rapidamente trasformando il colore del carattere degli errori specificati in bianco. Si prega di seguire i passaggi seguenti ed eseguire il codice in base alle proprie esigenze.

1. Nel tuo Excel, premi il altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduli. Quindi copia uno dei seguenti codici VBA in Moduli finestra.

Codice VBA 1: nascondi più valori di errore specifici nell'intervallo selezionato

'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

Nota: Nel frammento xArrFinStr = Array("#DIV/0!", "#N/A", "#NOME?") nella 12a riga, dovresti sostituire "#DIV/0!", "#N/A", "#NOME?" con gli errori effettivi che vuoi nascondere ricordati di racchiudere ogni valore tra virgolette e separarli con virgole.

Codice VBA 2: nascondi più valori di errore specifici su più fogli

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
Nota:
  • Nel frammento xArr = Array("Foglio1", "Foglio2") nella 15a riga, dovresti sostituire "Foglio 1", "Foglio 2" con i nomi effettivi dei fogli dove vuoi nascondere gli errori. Ricordarsi di racchiudere i nomi di ogni foglio tra virgolette doppie e separarli con virgole.
  • Nel frammento xArrFinStr = Array("#DIV/0!", "#N/A", "#NOME?") nella 16a riga, dovresti sostituire "#DIV/0!", "#N/A", "#NOME?" con l'errore effettivo che vuoi nascondere, ricordati di racchiudere ogni errore tra virgolette e separarli con virgole.

3. Stampa F5 per eseguire il codice VBA. Nota: Se hai usato il file Codice VBA 1, verrà visualizzata una finestra di dialogo che ti chiede di selezionare l'intervallo in cui trovare ed eliminare i valori di errore. Puoi anche fare clic sulla scheda di un foglio per selezionare l'intero foglio.

4. Viene visualizzata la finestra di dialogo mostrata di seguito che ti informa che i valori di errore specificati sono stati nascosti. Clic OK per chiudere la finestra di dialogo.

5. I valori di errore specificati sono stati nascosti immediatamente.


Sostituisci valori di errore specifici con altri valori con la funzione Creazione guidata condizioni di errore

Se non hai familiarità con il codice VBA, la funzione Creazione guidata condizione di errore di Kutools per Excel potrebbe aiutarti a trovare facilmente tutti i valori di errore, tutti gli errori #N/A o qualsiasi errore tranne #N/A e sostituirli con altri valori specificati , continua a leggere per scoprire come portare a termine questo lavoro.

1. Sul Kutools scheda, nel Formula gruppo, clicca Più > Procedura guidata di errore.

2. Nel popup Procedura guidata di errore finestra di dialogo, eseguire le seguenti operazioni:
  • Nel Escursione casella, fare clic sul pulsante di selezione dell'intervallo a destra per specificare l'intervallo che contiene gli errori da nascondere. Nota: Per cercare nell'intero foglio, fare clic sulla scheda del foglio.
  • Nel Tipi di errore sezione, specificare quali valori di errore nascondere.
  • Nel Visualizzazione degli errori sezione, scegli un modo con cui vuoi sostituire gli errori.

3. Clic Ok. I valori di errore specificati vengono visualizzati come l'opzione selezionata.

Nota: Per utilizzare l' Procedura guidata di errore funzionalità, dovresti avere Kutools per Excel installato sul tuo computer. Se non hai Kutools installato, clicca qui per scaricare e installare. Il componente aggiuntivo professionale di Excel offre una prova gratuita di 30 giorni senza limitazioni.


Sostituisci un errore specifico con altri valori con una formula

Per sostituire un valore di errore specifico, Excel's IF, SENAe ERRORE.TIPO le funzioni possono farti un favore. Ma prima, dovresti conoscere il codice numerico corrispondente a ciascun valore di errore.

# Errore Formula Reso
#NULLO! = ERROR.TYPE (#NULL!) 1
# DIV / 0! = ERROR.TYPE (# DIV / 0!) 2
#VALORE! = ERROR.TYPE (#VALUE!) 3
#RIF! = ERROR.TYPE (#REF!) 4
# NOME? = ERROR.TYPE (#NAME?) 5
#NUM! = ERROR.TYPE (#NUM!) 6
#N / A = ERROR.TYPE (# N / A) 7
#GETTING_DATI = ERROR.TYPE (#GETTING_DATA) 8
#VERSARE! =ERRORE.TYPE(#SPILL!) 9
#SCONOSCIUTO! =ERRORE.TYPE(#SCONOSCIUTO!) 12
#CAMPO! =ERRORE.TYPE(#FIELD!) 13
#CALCIO! =ERRORE.TYPE(#CALC!) 14
Qualunque altra cosa = ERROR.TYPE (123) #N / A

Ad esempio, hai una tabella con valori come mostrato sopra. Per sostituire il # DIV / 0! errore con la stringa di testo Dividi per zero errori, dovresti prima trovare il codice di questo errore, che è 2. E quindi applica la seguente formula nella cella B2e trascina il quadratino di riempimento verso il basso per applicare la formula alle celle seguenti:

=SE(IFNA(ERRORE.TYPE(A2),A2)=2,"Dividi per errore zero",A2)

Nota:
  • Nella formula è possibile sostituire il codice di errore 2 al codice corrispondente ad un altro valore di errore.
  • Nella formula è possibile sostituire la stringa di testo "Dividi per errore zero" ad un altro messaggio di testo, o "" se vuoi sostituire l'errore con una cella vuota.

Articoli correlati

Come nascondere tutti i valori di errore in Excel?

Quando lavori su un foglio di lavoro Excel, a volte, potresti scoprire che ci sono alcuni valori di errore, come # DIV / 0, #REF, # N / A e così via, sono causati dall'errore delle formule. Ora, vorresti nascondere tutti questi valori di errore nel foglio di lavoro, come potresti risolvere questa attività rapidamente e facilmente in Excel?

Come cambiare #DIV/0! Errore nel messaggio leggibile in Excel?

A volte, quando usiamo la formula per calcolare in Excel, vengono visualizzati alcuni messaggi di errore. Ad esempio, in questa formula = A1 / B1, se B1 è vuoto o contiene 0, la formula visualizzerà un errore # DIV / 0. C'è un modo per rendere quei messaggi di errore chiaramente leggibili o se vuoi usare altri messaggi per sostituire gli errori, cosa dovresti fare?

Come evitare l'errore #Ref durante l'eliminazione delle righe in Excel?

Mentre fai riferimento una cella a un'altra cella, la cella visualizzerà l'errore #REF se la riga di riferimento è stata eliminata come mostrato nell'immagine sottostante. Ora parlerò di come evitare l'errore #ref e fare riferimento automaticamente alla cella successiva durante l'eliminazione della riga.

Come evidenziare tutte le celle di errore in Excel?

Se crei delle formule nel tuo foglio di lavoro, sarà inevitabile che compaiano dei valori di errore. Puoi evidenziare tutte queste celle che contengono i valori di errore nel tuo foglio di lavoro contemporaneamente? L'utilità di formattazione condizionale in Excel può aiutarti a risolvere questo problema.

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
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