Gå til hovedindhold

Sådan skifter du mellem skjulte og synlige ark i Excel?

Hvis du antager, at du har nogle ark med vigtige data, som du ikke vil have, at andre skal se, kan skjule regneark være en enkel måde at beskytte data i Excel på. Men nogle gange er du nødt til at vise de skjulte ark og derefter skjule dem igen, normalt skal du skjule dem en efter en, hvis du normalt bruger denne operation, vil det være besværligt og tidskrævende. I denne artikel vil jeg introducere dig til nogle hurtige måder at skifte regneark mellem skjult og skjult på.

Skift arkene mellem skjult og skjult med VBA-kode

Skift arkene mellem skjult og skjult med Kutools til Excel


pil blå højre boble Skift arkene mellem skjult og skjult med VBA-kode

Hvis du antager, at du har en projektmappe med Ark1, Ark2 og Ark3 er skjult, kan følgende VBA-kode hjælpe dig med hurtigt at få vist dem, og det andet klik skjuler dem igen. Gør følgende:

1. Klik Udvikler > Visual Basic, Og en ny Microsoft Visual Basic til applikationer vindue vises, skal du klikke indsatte > Moduler, og indtast derefter følgende kode i modulet.

Sub ToggleHideUnhideDataSheets()
Application.ScreenUpdating = False
Dim wb As Workbook
Dim ShtNames() As Variant
Set wb = ActiveWorkbook
ShtNames = Array("Sheet1", "Sheet2", "Sheet3")
For i = 0 To UBound(ShtNames)
wb.Sheets(ShtNames(i)).Visible = Not wb.Sheets(ShtNames(i)).Visible
Next i
Application.ScreenUpdating = True
End Sub

I ovenstående kode er ShtNames = Array ("Ark1", "Ark2", "Ark3") er en variabel, kan du ændre de skjulte regnearknavne, som du har brug for.

2. Tryk derefter på F5 tast for at køre koden, og de skjulte ark er blevet vist. Hvis du vil skjule dem igen, skal du trykke på F5 igen.


pil blå højre boble Skift arkene mellem skjult og skjult med Kutools til Excel

Med Skift synlighed af skjulte regneark funktion af Kutools til Excel, kan du let skifte ark mellem skjult og skjult ved at klikke på kommandoen Arbejdsark.

Kutools til Excel indeholder mere end 300 praktiske Excel-værktøjer. Gratis at prøve uden begrænsning på 30 dage. Få det nu.

Når du har installeret Kutools til Excel, kan du gøre som følger:

1. Åbn projektmappen, som skal indeholde nogle skjulte regneark.

2. Klik Kutools > regneark, se skærmbillede:

doc-skifte-skjulte ark1

Når du klikker på regneark kommandoen én gang, alle skjulte ark er blevet vist. Hvis du vil skjule dem igen, skal du klikke på regneark kommando med en anden gang. Se skærmbilleder:

doc-skifte-skjulte ark2
-1
doc-skifte-skjulte ark3
-1
doc-skifte-skjulte ark2

Bemærk: Denne funktion gælder også for ikke-kontinuerlige skjulte ark.

Hvis du vil vide mere om denne funktion, skal du klikke Skift synlighed af skjulte regneark.


Relateret artikel:

Skift mellem skjulte og synlige kolonner i Excel

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 (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Works great, but how would you modify this to use the sheet's CodeNames instead of "Sheet" names?

That way user can still change the Tab name and Tab order as needed.

Thanks!
This comment was minimized by the moderator on the site
At the end of the code you forgot to put Application.ScreenUpdating = True to turn back on the screen updating. :-)
This comment was minimized by the moderator on the site
[quote]At the end of the code you forgot to put Application.ScreenUpdating = True to turn back on the screen updating. :-)By Greg[/quote] Thanks for your feedback. We will change it soon. :lol:
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations