Det kan være lurt å skjule de inaktive regnearkene med denne makroen. Excel lar deg ikke skjule alle ark i en arbeidsbok; minst én må vises. Du kan imidlertid skjule alt unntatt det aktive arket.
Makroen her går gjennom regnearkene og matcher hvert regnearknavn med navnet på det aktive arket. Hver gang makroen går i løkker, skjuler den ethvert uovertruffent regneark.
Sub Makro1()
'Trinn 1: Deklarer variablene dine
Dim ws As Worksheet
'Trinn 2: Begynn å gå gjennom alle regnearkene
For hver ws In This Workbook.Worksheets
'Trinn 3: Sjekk navnene på hvert regneark
Hvis ws.Name <> ThisWorkbook.ActiveSheet.Name Then
'Trinn 4: Skjul arket
ws.Visible = xlSheetHidden
Slutt om
'Trinn 5: Gå til neste regneark
Neste ws
End Sub
Trinn 1 erklærer et objekt kalt ws. Dette trinnet oppretter en minnebeholder for hvert regneark som makroen går gjennom.
Trinn 2 starter loopingen, og ber Excel evaluere alle regnearkene i denne arbeidsboken. Legg merke til forskjellen mellom ThisWorkbook og ActiveWorkbook. ThisWorkBook-objektet refererer til arbeidsboken som inneholder koden. ActiveWorkBook-objektet refererer til den aktive arbeidsboken. De returnerer ofte det samme objektet, men hvis arbeidsboken som kjører koden ikke er den aktive arbeidsboken, returnerer de forskjellige objekter. I dette tilfellet vil du ikke risikere å skjule ark i andre arbeidsbøker, så du bruker ThisWorkBook.
I trinn 3 sammenligner makroen ganske enkelt navnet på det aktive arket med arket som for øyeblikket sløyfes.
Hvis arknavnene er forskjellige, skjuler makroen arket i trinn 4.
I trinn 5 går du tilbake for å få neste ark. Etter at alle arkene er evaluert, avsluttes makroen.
Merk at du bruker xlsheetHidden i makroen din. Denne egenskapen bruker standardskjultilstanden du vanligvis får når du høyreklikker på et ark og velger Skjul. I denne standard skjuletilstanden kan en bruker høyreklikke på hvilken som helst fane og velge Vis, som viser alle skjulte ark. Men en annen skjultilstand er mer hemmelig enn standarden. Hvis du bruker xlSheetVeryHidden for å skjule arkene dine, vil brukerne ikke kunne se dem i det hele tatt - selv om de høyreklikker på en fane og velger Vis. Den eneste måten å vise et ark skjult på denne måten er å bruke VBA.
For å implementere denne makroen kan du kopiere og lime den inn i en standardmodul:
Aktiver Visual Basic Editor ved å trykke Alt+F11.
Høyreklikk navnet på prosjektet/arbeidsboken i prosjektvinduet.
Velg Sett inn → Modul.
Skriv eller lim inn koden i den nyopprettede modulen.
Hvordan blokkere Microsoft Word fra å åpne filer i skrivebeskyttet modus på Windows Microsoft Word åpner filer i skrivebeskyttet modus, noe som gjør det umulig å redigere dem? Ikke bekymre deg, metodene er nedenfor
Slik fikser du feil ved utskrift av feil Microsoft Word-dokumenter Feil ved utskrift av Word-dokumenter med endrede fonter, rotete avsnitt, manglende tekst eller tapt innhold er ganske vanlig. Men ikke gjør det
Hvis du har brukt pennen eller merkepennen til å tegne på PowerPoint-lysbildene dine under en presentasjon, kan du lagre tegningene til neste presentasjon eller slette dem, slik at du neste gang du viser dem starter med rene PowerPoint-lysbilder. Følg disse instruksjonene for å slette penn- og merkepenntegninger: Slette linje én på […]
Stilbiblioteket inneholder CSS-filer, Extensible Stylesheet Language-filer (XSL) og bilder som brukes av forhåndsdefinerte mastersider, sideoppsett og kontroller i SharePoint 2010. For å finne CSS-filer i stilbiblioteket til et publiseringsnettsted: Velg Site Actions→ View Alt innhold på nettstedet. Innholdet på nettstedet vises. Style-biblioteket ligger i […]
Ikke overveld publikum med gigantiske tall. I Microsoft Excel kan du forbedre lesbarheten til dashbordene og rapportene dine ved å formatere tallene dine slik at de vises i tusenvis eller millioner.
Lær hvordan du bruker SharePoints sosiale nettverksverktøy som lar enkeltpersoner og grupper kommunisere, samarbeide, dele og koble til.
Julianske datoer brukes ofte i produksjonsmiljøer som et tidsstempel og hurtigreferanse for et batchnummer. Denne typen datokoding lar forhandlere, forbrukere og serviceagenter identifisere når et produkt ble laget, og dermed alderen på produktet. Julianske datoer brukes også i programmering, militæret og astronomi. Forskjellig […]
Du kan lage en nettapp i Access 2016. Så hva er en nettapp egentlig? Vel, nettet betyr at det er online, og appen er bare en forkortelse for "applikasjon". En Custom Web App er en online databaseapplikasjon som du får tilgang til fra skyen ved hjelp av en nettleser. Du bygger og vedlikeholder nettappen i skrivebordsversjonen […]
De fleste sidene i SharePoint 2010 viser en liste over navigasjonskoblinger på hurtigstartlinjen langs venstre side av siden. Hurtigstartlinjen viser koblinger til innhold på nettstedet som lister, biblioteker, nettsteder og publiseringssider. Hurtigstartlinjen inneholder to svært viktige lenker: Linken for alt nettstedinnhold: […]
For enkle problemer finner Solver i Excel vanligvis raskt de optimale Solver-variabelverdiene for objektivfunksjonen. Men i noen tilfeller har Solver problemer med å finne Solver-variabelverdiene som optimerer objektivfunksjonen. I disse tilfellene viser Solver vanligvis en melding eller en feilmelding som beskriver eller diskuterer problemet som […]
