Det kan være lurt å skjule inaktive regneark med denne makroen. Excel lar deg ikke skjule alle ark i en arbeidsbok; minst har en som skal vises. Du kan imidlertid skjule alle, men det aktive arket.

Hvordan makro fungerer

Makro her looper gjennom regnearkene og kamper hvert regneark navn til det aktive arket navn. Hver gang de makro loops, det skjuler noe enestående regneark
Sub Makro1 () 'Trinn 1:. Erklærer variabler Dim ws As Worksheet'Step 2: Begynn looping gjennom alle regneark for hver ws I ThisWorkbook.Worksheets'Step 3: Sjekk hvert regneark navn Hvis ws.Name < > ThisWorkbook.ActiveSheet.Name Then'Step 4: Hide arket ws.Visible = xlSheetHidden End If'Step 5: Loop til neste regnearket Neste wsEnd Sub

Trinn 1 erklærer et objekt kalt ws. Dette trinnet oppretter en minne beholder for hvert regneark at makroen looper gjennom.

Trinn 2 begynner looping, forteller Excel til å vurdere alle regnearkene i arbeidsboken. Merk forskjellen mellom Thisworkbook og Active. Thisworkbook objektet refererer til arbeidsboken som inneholder koden. Den Active objektet refererer til det aktive arbeidsboken. De ofte tilbake samme objekt, men hvis arbeidsboken du kjører koden er ikke den aktive arbeidsboken, de kommer tilbake forskjellige stedene. I dette tilfellet, trenger du ikke ønsker å risikere gjemme ark i andre arbeidsbøker, slik at du bruker Thisworkbook.

I trinn 3, makrosammen bare det aktive navn ark til ark som er under løkker.

Hvis papiret navnene er forskjellige, skjuler makro arket i trinn 4.

i trinn 5, til deg sløyfe tilbake får neste ark. Etter at alle arkene er evaluert, makro endene.
Merke til at du bruker xlsheetHidden i makroen. Denne egenskapen gjelder standard skjul staten du vanligvis får når du høyreklikker et ark og velg Hide. I denne standard skjul tilstand, kan en bruker høyreklikke på en fane og velg Vis skjulte, som viser alle skjulte ark. Men en annen skjul staten er mer hemmelig enn standard. Hvis du bruker xlSheetVeryHidden å skjule ark, vil ikke brukerne kunne se dem i det hele tatt - selv om de høyreklikke på en fane og velg Vis. Den eneste måten du viser et ark skjult på denne måten er å bruke VBA

Hvordan bruke makro

For å gjennomføre denne makroen, kan du kopiere og lime den inn i en standard modul. < .. br>
Aktiver Visual Basic Editor ved å trykke Alt + F11

Høyreklikk på prosjektet /arbeidsbok navnet i prosjektvinduet

Velg Sett → Module .

Skriv eller lim inn koden i den nyopprettede modulen.