Vejledningen forklarer, hvordan du fjerner skjul på regneark i Excel 2016, 2013, 2010 og lavere. Du lærer, hvordan du hurtigt fjerner skjul på regneark ved at højreklikke, og hvordan du fjerner skjul på alle ark på én gang med VBA-kode.

Forestil dig dette: Du åbner et regneark og bemærker, at nogle formler henviser til et andet regneark. Du kigger på fanebladene, men det refererede regneark er der ikke! Du forsøger at oprette et nyt ark med samme navn, men Excel fortæller dig, at det allerede findes. Hvad betyder det? Simpelthen, at regnearket er skjult. Hvordan kan du se skjulte ark i Excel? Du skal naturligvis fjerne dem. Dette kan væregøres manuelt ved at bruge Excels Skjul kommando eller automatisk med VBA. I denne vejledning lærer du begge metoder.

Sådan fjerner du skjulte ark i Excel

Hvis du kun vil se et eller to skjulte ark, kan du se her, hvordan du hurtigt kan fjerne dem:

1. Højreklik på et faneblad i din Excel-arbejdsbog, og vælg Skjul ... fra kontekstmenuen.
2. I den Skjul feltet, vælg det skjulte ark, du vil vise, og klik på OK (eller dobbeltklik på arkets navn). Færdig!

Ud over højreklik-kontekstmenuen kan du også bruge Skjul dialogboksen kan tilgås fra båndet:

• I Excel 2003 og tidligere skal du klikke på Format menuen, og klik derefter på Ark > Skjul .
• I Excel 2016, Excel 2013, Excel 2010 og Excel 2007 skal du gå til Hjem faneblad> Celler gruppe, og klik på Format Under Synlighed , peger på Skjul & Fjern skjul , og klik derefter på Skjul ark ...

Bemærk. Excel's Skjul Hvis du vil fjerne flere ark, skal du gentage ovenstående trin for hvert regneark for sig, eller du kan fjerne alle ark på én gang ved at bruge nedenstående makroer.

Sådan fjerner du ark i Excel med VBA

I situationer, hvor du har flere skjulte regneark, kan det være meget tidskrævende at fjerne dem et for et, især hvis du gerne vil fjerne alle arkene i din projektmappe. Heldigvis kan du automatisere processen med en af følgende makroer.

Sådan fjerner du alle ark i Excel

Denne lille makro gør alle skjulte ark i en aktiv projektmappe synlige på en gang uden at forstyrre dig med meddelelser.

Sub Unhide_All_Sheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub

Vis alle skjulte ark og vis deres antal

Ligesom ovenstående makro viser denne makro også alle skjulte ark i en projektmappe. Forskellen er, at den efter afslutningen viser en dialogboks, der informerer brugeren om, hvor mange ark der er blevet fjernet:

Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If wks.Visible xlSheetVisible Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " Worksheets have been unhidden." , vbOKOnly, "Unhiding worksheets" Else MsgBox "No hidden worksheets have been found." , vbOKOnly,"Fjern skjul af regneark" End If End Sub

Skjul flere ark, som du vælger

Hvis du hellere vil have, at du ikke vil fjerne alle regneark på én gang, men kun dem, som brugeren udtrykkeligt accepterer at gøre synlige, skal du lade makroen spørge om hvert enkelt skjulte ark individuelt, f.eks. på følgende måde:

Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Each wks In ActiveWorkbook.Worksheets If wks.Visible = xlSheetHidden Then MsgResult = MsgBox( "Unhide sheet " & wks.Name & "?" , vbYesNo, "Unhiding worksheets" ) If MsgResult = vbYes Then wks.Visible = xlSheetVisible End If Next End Sub

Skjul regneark med et bestemt ord i arknavnet

I situationer, hvor du kun ønsker at fjerne skjulte ark, der indeholder en bestemt tekst i deres navne, skal du tilføje en IF-anvisning til makroen, der kontrollerer navnet på hvert skjult regneark og kun fjerner skjulte ark, der indeholder den angivne tekst.

I dette eksempel fjerner vi ark med ordet " rapport " i navnet. Makroen vil vise ark som f.eks. Rapport , Rapport 1 , Rapport for juli og lignende.

Hvis du vil fjerne skjul på regneark, hvis navne indeholder et andet ord, skal du erstatte " rapport " i den følgende kode med din egen tekst.

Sub Unhide_Sheets_Contain() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, "report" )> 0) Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " worksheets have been unhidden." , vbOKOnly, "Unhiding worksheets" Else MsgBox "No hidden worksheetsWorksheets med det angivne navn er blevet fundet." , vbOKOnly, "Unhiding worksheets" End If End Sub

Sådan bruger du makroer til at fjerne skjulte ark i Excel

Hvis du vil bruge makroerne i dit regneark, kan du enten kopiere/klistre koden ind i Visual Basic Editor eller downloade regnearket med makroerne og køre dem derfra.

Sådan indsætter du makroen i din projektmappe

Du kan tilføje alle ovenstående makroer til din projektmappe på denne måde:

1. Åbn arbejdsmappen med skjulte ark.
2. Tryk på Alt + F11 for at åbne Visual Basic-editoren.
3. Højreklik på i venstre rude på ThisWorkbook og vælg Indsæt > Modul fra kontekstmenuen.
4. Indsæt koden i vinduet Kode.
5. Tryk på F5 for at køre makroen.

Du kan finde en detaljeret trin-for-trin-vejledning i Sådan indsætter og kører du VBA-kode i Excel.

Download arbejdsbogen med makroerne

Alternativt kan du downloade vores prøvearbejdsmappe til at fjerne skjulte ark i Excel, som indeholder alle de makroer, der er beskrevet i denne vejledning:

• Skjul_alle_blade - fjerne alle regneark i en aktiv projektmappe midlertidigt og lydløst.
• Unhide_All_Sheets_Count - viser alle skjulte ark med angivelse af deres antal.
• Skjul ikke_valgte_blade - vise skjulte ark, som du vælger at fjerne.
• Skjul ikke_blade_Indhold - fjerne skjul på regneark, hvis navne indeholder et bestemt ord eller en bestemt tekst.

For at køre makroerne i Excel skal du gøre følgende:

1. Åbn den downloadede arbejdsbog, og aktiver makroerne, hvis du bliver bedt om det.
2. Åbn din egen projektmappe, hvor du vil se skjulte ark.
3. I din projektmappe skal du trykke på Alt + F8 , vælge den ønskede makro og klikke på Kør .

Hvis du f.eks. vil fjerne alle ark i din Excel-fil og vise antallet af skjulte ark, skal du køre denne makro:

Sådan viser du skjulte ark i Excel ved at oprette en brugerdefineret visning

Bortset fra makroer kan det kedelige i at vise skjulte regneark et ad gangen overvindes ved at oprette en brugerdefineret visning. Hvis du ikke er bekendt med denne Excel-funktion, kan du tænke på en brugerdefineret visning som et øjebliksbillede af dine arbejdsbogsindstillinger, der kan anvendes når som helst med et museklik. Denne metode er bedst at bruge helt i begyndelsen af dit arbejde, når ingen af arkene er skjult endnu.

Så det, vi vil gøre nu, er at oprette Vis alle ark brugerdefineret visning. Her er hvordan:

1. Sørg for, at alle regneark i din projektmappe er synlig Dette tip viser, hvordan du hurtigt kan kontrollere, om der er skjulte ark i arbejdsbogen.
2. Gå til Se faneblad> Visninger i arbejdsbogen gruppe, og klik på Brugerdefinerede visninger knap.

Brugerdefineret visning dialogboksen vises, og du klikker på Tilføj...

i den Tilføj visning dialogboksen, skriv navnet på din brugerdefinerede visning, f.eks. ShowAllSheets , og klik på OK.

Du kan nu skjule så mange regneark, som du vil, og når du ønsker at gøre dem synlige igen, skal du klikke på Brugerdefinerede visninger knappen, skal du vælge den ShowAllSheet visning og klik på Vis , eller du kan blot dobbeltklikke på visningen.

Så er det nok! Alle skjulte ark vises med det samme.

Sådan kontrolleres det, om en projektmappe indeholder skjulte ark

Den hurtigste måde at opdage skjulte ark i Excel er følgende: Højreklik på et faneblad og se, om den Skjul... Hvis den er aktiveret, kan du klikke på den og se, hvilke ark der er skjult. Hvis den er deaktiveret (gråtonet), indeholder arbejdsmappen ikke skjulte ark.

Bemærk: Denne metode viser ikke meget skjulte ark. Den eneste måde at få vist sådanne ark på er ved at fjerne dem med VBA.

Kan ikke fjerne skjulte ark i Excel - problemer og løsninger

Hvis du ikke kan fjerne skjul på visse ark i Excel, kan følgende tips til fejlfinding måske kaste lys over hvorfor.

1. Arbejdsbogen er beskyttet

Det er ikke muligt at skjule eller fjerne arkene, hvis arbejdsbogens struktur er blevet beskyttet (skal ikke forveksles med kryptering af kodeord på arbejdsbogsniveau eller beskyttelse af regneark). For at kontrollere dette skal du gå til Anmeldelse faneblad> Ændringer gruppe og kigge på den Beskyt arbejdsbog knappen. Hvis denne knap er markeret med grønt, er arbejdsmappen beskyttet. Hvis du vil fjerne beskyttelsen, skal du klikke på knappen Beskyt arbejdsbog knappen, indtast adgangskoden, hvis du bliver bedt om det, og gem arbejdsmappen. Du kan finde flere oplysninger under Sådan låser du en beskyttet arbejdsmappe op i Excel.

2. Arbejdsark er meget skjulte

Hvis dine regneark er skjult af VBA-kode, der gør dem meget skjulte (tildeler xlSheetVeryHidden egenskab), kan sådanne regneark ikke vises ved hjælp af Skjul Kommando. For at fjerne meget skjulte ark skal du ændre egenskaben fra xlSheetVeryHidden til xlSheetVisible fra Visual Basic-editoren eller køre denne VBA-kode.

3. Der er ingen skjulte ark i arbejdsmappen

Hvis den Skjul kommandoen er gråtonet både på båndet og i højrekliksmenuen, det betyder, at der ikke er et eneste skjult ark i din projektmappe :)

Sådan fjerner du skjul på ark i Excel. Hvis du er nysgerrig efter at vide, hvordan du skjuler eller fjerner skjul på andre objekter som rækker, kolonner eller formler, kan du finde alle detaljer i nedenstående artikler. Jeg takker for din læsning og håber at se dig på vores blog i næste uge!

Tilgængelige downloads

Makroer til at fjerne skjulte regneark i Excel