En Excel-makro til at skjule alt undtagen det aktive regneark

Du ønsker måske at skjule de inaktive regneark med denne makro. Excel lader dig ikke skjule alle ark i en projektmappe; mindst én skal vises. Du kan dog skjule alt undtagen det aktive ark.

Sådan fungerer makroen

Makroen her går gennem regnearkene og matcher hvert regnearks navn med det aktive arks navn. Hver gang makroen går i løkker, skjuler den ethvert uovertruffent regneark.

Undermakro1()
Trin 1: Erklær dine variabler
    Dim ws As Arbejdsark
Trin 2: Begynd at gennemgå alle arbejdsark
    For hver ws In ThisWorkbook.Worksheets
Trin 3: Kontroller hvert regnearks navn
    Hvis ws.Name <> ThisWorkbook.ActiveSheet.Name Så
Trin 4: Skjul arket
    ws.Visible = xlSheetHidden
    Afslut Hvis
Trin 5: Gå videre til næste regneark
    Næste ws
Slut Sub

Trin 1 erklærer et objekt kaldet ws. Dette trin opretter en hukommelsesbeholder for hvert regneark, som makroen går igennem.

Trin 2 begynder loopingen og beder Excel om at evaluere alle regneark i denne projektmappe. Bemærk forskellen mellem ThisWorkbook og ActiveWorkbook. ThisWorkBook-objektet henviser til den projektmappe, der indeholder koden. ActiveWorkBook-objektet henviser til den aktuelt aktive projektmappe. De returnerer ofte det samme objekt, men hvis projektmappen, der kører koden, ikke er den aktive projektmappe, returnerer de forskellige objekter. I dette tilfælde vil du ikke risikere at skjule ark i andre projektmapper, så du bruger ThisWorkBook.

I trin 3 sammenligner makroen simpelthen navnet på det aktive ark med det ark, der i øjeblikket bliver sløjfet.

Hvis arknavnene er forskellige, skjuler makroen arket i trin 4.

I trin 5 går du tilbage for at få det næste ark. Når alle ark er evalueret, slutter makroen.

Bemærk at du bruger xlsheetHidden i din makro. Denne egenskab anvender standardskjultilstanden, du normalt ville få, når du højreklikker på et ark og vælger Skjul. I denne standardskjultilstand kan en bruger højreklikke på en hvilken som helst fane og vælge Vis, som viser alle skjulte ark. Men en anden skjuletilstand er mere hemmelig end standardtilstanden. Hvis du bruger xlSheetVeryHidden til at skjule dine ark, vil brugerne slet ikke kunne se dem - selvom de højreklikker på en fane og vælger Vis. Den eneste måde at vise et ark skjult på denne måde er at bruge VBA.

Sådan bruger du makroen

For at implementere denne makro kan du kopiere og indsætte den i et standardmodul:

Aktiver Visual Basic Editor ved at trykke på Alt+F11.

Højreklik på projektets/projektmappens navn i projektvinduet.

Vælg Indsæt → Modul.

Indtast eller indsæt koden i det nyoprettede modul.


Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows

Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows

Sådan blokerer du Microsoft Word fra at åbne filer i skrivebeskyttet tilstand på Windows Microsoft Word åbner filer i skrivebeskyttet tilstand, hvilket gør det umuligt at redigere det? Bare rolig, metoderne er nedenfor

Sådan rettes forkert udskrivning af Microsoft Word-dokumenter

Sådan rettes forkert udskrivning af Microsoft Word-dokumenter

Sådan rettes fejl ved udskrivning af forkerte Microsoft Word-dokumenter Fejl ved udskrivning af Word-dokumenter med ændrede skrifttyper, rodede afsnit, manglende tekst eller tabt indhold er ret almindelige. Men lad være

Slet pen- og highlighter-tegninger på dine PowerPoint-dias

Slet pen- og highlighter-tegninger på dine PowerPoint-dias

Hvis du har brugt pennen eller highlighteren til at tegne på dine PowerPoint-dias under en præsentation, kan du gemme tegningerne til næste præsentation eller slette dem, så næste gang du viser den, starter du med rene PowerPoint-dias. Følg disse instruktioner for at slette pen- og highlighter-tegninger: Sletning af linjer en ved […]

Indhold af stilbibliotek i SharePoint 2010

Indhold af stilbibliotek i SharePoint 2010

Style-biblioteket indeholder CSS-filer, Extensible Stylesheet Language-filer (XSL) og billeder, der bruges af foruddefinerede mastersider, sidelayouts og kontrolelementer i SharePoint 2010. For at finde CSS-filer i Style-biblioteket på et udgivelsessted: Vælg Site Actions→ View Alt webstedsindhold. Indholdet af webstedet vises. Style-biblioteket ligger i […]

Formater tal i tusinder og millioner i Excel-rapporter

Formater tal i tusinder og millioner i Excel-rapporter

Overvæld ikke dit publikum med gigantiske tal. I Microsoft Excel kan du forbedre læsbarheden af ​​dine dashboards og rapporter ved at formatere dine tal, så de vises i tusinder eller millioner.

Sådan deler og følger du SharePoint-websteder

Sådan deler og følger du SharePoint-websteder

Lær, hvordan du bruger SharePoints sociale netværksværktøjer, der lader enkeltpersoner og grupper kommunikere, samarbejde, dele og forbinde.

Sådan konverteres datoer til julianske formater i Excel

Sådan konverteres datoer til julianske formater i Excel

Julianske datoer bruges ofte i produktionsmiljøer som et tidsstempel og hurtig reference for et batchnummer. Denne type datokodning giver detailhandlere, forbrugere og serviceagenter mulighed for at identificere, hvornår et produkt blev fremstillet, og dermed produktets alder. Julianske datoer bruges også i programmering, militæret og astronomi. Forskellige […]

Sådan opretter du en Access Web App

Sådan opretter du en Access Web App

Du kan oprette en webapp i Access 2016. Så hvad er en webapp overhovedet? Nå, web betyder, at det er online, og app er kun en forkortelse for "applikation". En Custom Web App er en online databaseapplikation, der tilgås fra skyen ved hjælp af en browser. Du bygger og vedligeholder webappen i desktopversionen […]

Hurtig startlinje i SharePoint 2010

Hurtig startlinje i SharePoint 2010

De fleste sider i SharePoint 2010 viser en liste over navigationslinks på linjen Hurtig start langs venstre side af siden. Hurtig startlinjen viser links til fremhævet webstedsindhold såsom lister, biblioteker, websteder og udgivelsessider. Hurtigstartlinjen indeholder to meget vigtige links: Linket Alt webstedsindhold: […]

Hvad betyder Solver-fejlmeddelelserne i Excel?

Hvad betyder Solver-fejlmeddelelserne i Excel?

Ved simple problemer finder Solver i Excel som regel hurtigt de optimale Solver-variableværdier for objektivfunktionen. Men i nogle tilfælde har Solver problemer med at finde de Solver-variableværdier, der optimerer objektivfunktionen. I disse tilfælde viser Solver typisk en meddelelse eller en fejlmeddelelse, der beskriver eller diskuterer det problem, der […]