Slik skjuler regneark Tabs Bruke VBA

I Microsoft Excel, kan du bruke Visual Basic for Applications til å jobbe med regneark. Du kan opprette, kopiere, flytte, slette, låse og skjule regneark med noen få linjer med kode. Ofte vil du ønsker å skjule visse ark i arbeidsboken, spesielt de som inneholder uformatert rådata og beregninger. Hvis du vil skjule et regneark manuelt og uten bruk av makroer, kan du høyreklikke på fanen og velg "Hide" fra menyen. En enkel vippe makro kan hjelpe deg å automatisere denne oppgaven, spesielt hvis du har å forholde seg til mange regneark.

Bruksanvisning

1 Start Microsoft Excel. Trykk "CTRL + O", velg arbeidsboken som inneholder arkene du ønsker å skjule, og klikk deretter på "Open".

2 Trykk "ALT + F8" for å åpne "Makroer" -vinduet. Skriv "HideSheets" inn i "Makronavn" boksen og klikk deretter på "Create". Dette åpner VBA editor.

3 Skriv inn følgende kode i VBA editor.

Sub HideSheets ()

wSheets = Array ( "SHEET1", "SHEET2", "Sheet3")

wsstat = Regneark (wSheets (0)). Synlig

Hvis wsstat = xlSheetVisible Deretter

wsstat = xlSheetHidden

Ellers

wsstat = xlSheetVisible

Slutt om

For n = 0 til UBound (wSheets)

Worksheets(wSheets(n)).Visible = wsstat

Neste n

End Sub

4 Erstatt "SHEET1", "SHEET2" og "Sheet3" med navnene på arkene som du vil slette. Du kan legge et annet ark til listen ved å legge til navnet i anførselstegn og innledes med et komma.

Hint

• Du kan også bruke indeksnumrene til å identifisere regnearkene som du ønsker å slette. For eksempel, hvis du ønsker å slette den første og den tredje regnearket, erstatte platenavn i koden med "1" og "3" (uten anførselstegn).
• Som standard makroer er deaktivert i Microsoft Excel. For å aktivere dem, klikker du Microsoft Office-knappen, og deretter gå til "Alternativer for Excel." På "Popular" velger "Vis utvikler Tab på båndet." Gå til "Trust Center", klikk på "Innstillinger for klareringssenter" og velg deretter «Aktiver alle makroer" under "Makroinnstillinger." Klikk "OK" for å lagre endringene og start Excel.