Gå til hovedindhold

Hvordan skjuler man specifikke fejlværdier i Excel?

Lad os sige, at der er fejlværdier i dit Excel-regneark, som du ikke behøver at rette, men at skjule. For at løse problemet har vi talt om hvordan man skjuler alle fejlværdier i Excel, hvad nu hvis du kun vil skjule specifikke fejlværdier? I denne tutorial viser vi dig, hvordan du får dette job gjort på tre måder nedenfor.


Skjul flere specifikke fejlværdier ved at gøre teksten hvid med VBA

Vi har oprettet to VBA-koder for at hjælpe dig med at skjule flere specifikke fejlværdier i det valgte område eller på tværs af flere regneark hurtigt ved at gøre skriftfarven på de angivne fejl hvid. Følg venligst nedenstående trin og kør koden i overensstemmelse med dine behov.

1. I din Excel skal du trykke på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. klik indsatte > Moduler. Kopier derefter en af ​​følgende VBA-koder til Moduler vindue.

VBA-kode 1: Skjul flere specifikke fejlværdier i det valgte område

'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

Bemærk: I uddraget xArrFinStr = Array("#DIV/0!", "#N/A", "#NAVN?") i 12. række skal du udskifte "#DIV/0!", "#N/A", "#NAVN?" med de faktiske fejl du vil skjule, skal du huske at omslutte hver værdi med dobbelte anførselstegn og adskille dem med kommaer.

VBA-kode 2: Skjul flere specifikke fejlværdier på tværs af flere ark

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
Bemærk:
  • I uddraget xArr = Array("Ark1", "Ark2") i 15. række skal du udskifte "Ark1", "Ark2" med de faktiske navne på de ark, hvor du vil skjule fejlene. Husk at omslutte hvert arks navne med dobbelte anførselstegn og adskille dem med kommaer.
  • I uddraget xArrFinStr = Array("#DIV/0!", "#N/A", "#NAVN?") i 16. række skal du udskifte "#DIV/0!", "#N/A", "#NAVN?" med den faktiske fejl du vil skjule, skal du huske at omslutte hver fejl med dobbelte anførselstegn og adskille dem med kommaer.

3. Trykke F5 for at køre VBA-koden. Bemærk: Hvis du brugte VBA-kode 1, vil en dialogboks dukke op, hvor du bliver bedt om at vælge det område, hvor du kan finde og slette fejlværdier. Du kan også klikke på en arkfane for at vælge hele arket.

4. Dialogboksen som vist nedenfor dukker op og fortæller dig, at de angivne fejlværdier var skjulte. Klik OK for at lukke dialogen.

5. De angivne fejlværdier er blevet skjult på én gang.


Erstat specifikke fejlværdier med andre værdier med funktionen Error Condition Wizard

Hvis du ikke er bekendt med VBA-kode, kan Kutools til Excel's Error Condition Wizard-funktion hjælpe dig med nemt at finde alle fejlværdier, alle #N/A fejl eller eventuelle fejl undtagen #N/A og erstatte dem med andre værdier, du angiver , læs venligst videre for at finde ud af, hvordan du får dette job udført.

1. På den Kutools fanebladet i Formula gruppe, klik Mere > Fejltilstandsguide.

2. I pop op-vinduet Fejltilstandsguide dialogboks, skal du gøre som følger:
  • I Range boksen skal du klikke på knappen til valg af område til højre for at angive det område, der indeholder fejl, der skal skjules. Bemærk: For at søge på tværs af hele arket, klik på arkfanen.
  • I Fejltyper sektion, angiv hvilke fejlværdier, der skal skjules.
  • I Fejlvisning sektion, vælg en måde, hvordan du vil erstatte fejlene med.

3. klik Ok. De angivne fejlværdier vises som den indstilling, du valgte.

Bemærk: At bruge Fejltilstandsguide funktion, bør du have Kutools til Excel installeret på din computer. Hvis du ikke har installeret Kutools, klik her for at downloade og installere. Det professionelle Excel-tilføjelsesprogram tilbyder en 30-dages gratis prøveperiode uden begrænsninger.


Erstat en specifik fejl med andre værdier med en formel

For at erstatte en specifik fejlværdi, Excel's IF, IFNAog FEJL.TYPE funktioner kan gøre dig en tjeneste. Men først bør du kende hver fejlværdis tilsvarende talkode.

# Fejl Formula Returpolitik
#NUL! = FEJL.TYPE (#NULL!) 1
# DIV / 0! = FEJL.TYPE (# DIV / 0!) 2
#VÆRDI! = FEJL.TYPE (#VÆRDI!) 3
#REF! = FEJL.TYPE (#REF!) 4
#NAVN? = FEJL.TYPE (#NAVN?) 5
#NUM! = FEJL.TYPE (#NUM!) 6
# N / A = FEJL.TYPE (# N / A) 7
#GETTING_DATA = FEJL.TYPE (#GETTING_DATA) 8
#SPILDE! =FEJL.TYPE(#SPIL!) 9
#UKENDT! =FEJL.TYPE(#UKENDT!) 12
#MARK! =FEJL.TYPE(#FELT!) 13
#CALC! =FEJL.TYPE(#BEREGNING!) 14
Ellers andet = FEJL.TYPE (123) # N / A

For eksempel har du en tabel med værdier som vist ovenfor. For at erstatte # DIV / 0! fejl med tekststrengen Fejl divider med nul, bør du først finde koden for denne fejl, som er 2. Og anvend derefter følgende formel i cellen B2, og træk udfyldningshåndtaget ned for at anvende formlen på nedenstående celler:

=HVIS(IFNA(FEJL.TYPE(A2);A2)=2,"Divide med nul fejl",A2)

Bemærk:
  • I formlen kan du erstatte fejlkoden 2 til den kode, der svarer til anden fejlværdi.
  • I formlen kan du erstatte tekststrengen "Del med nul fejl" til anden sms, eller "" hvis du vil erstatte fejlen med en tom celle.

Relaterede artikler

Sådan skjules alle fejlværdier i Excel?

Når du arbejder på Excel-regneark, kan du nogle gange finde ud af, at der er nogle fejlværdier, såsom # DIV / 0, #REF, # N / A og så videre, de skyldes formelfejlen. Nu vil du gerne skjule alle disse fejlværdier i regnearket. Hvordan kunne du løse denne opgave hurtigt og nemt i Excel?

Sådan ændres #DIV/0! Fejl til den læsbare meddelelse i Excel?

Nogle gange, når vi bruger formlen til at beregne i Excel, vises nogle fejlmeddelelser. For eksempel i denne formel = A1 / B1, hvis B1 er tom eller indeholder 0, vil formlen vise en # DIV / 0-fejl. Er der nogen måde at gøre disse fejlmeddelelser klart læselige, eller hvis du vil bruge andre beskeder til at erstatte fejlene, hvad skal du gøre?

Sådan undgår du #Ref-fejl, mens du sletter rækkerne i Excel?

Mens du henviser en celle til en anden celle, viser cellen #REF-fejl, hvis referencerække er slettet som vist nedenstående skærmbillede. Nu vil jeg tale om, hvordan man undgår #ref-fejl og automatisk henviser til næste celle, mens jeg sletter rækken.

Sådan fremhæves alle fejlceller i Excel?

Hvis du opretter formler i dit regneark, vil det være uundgåeligt, at der vises nogle fejlværdier. Kan du fremhæve alle disse celler, som indeholder fejlværdierne i dit regneark på én gang? Værktøjet Betinget formatering i Excel kan hjælpe dig med at løse dette problem.

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
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