Come nascondere foglio di schede utilizzando VBA

January 15

In Microsoft Excel, è possibile utilizzare Visual Basic, Applications Edition per lavorare con fogli di lavoro. È possibile creare, duplicare, spostare, eliminare, bloccare e nascondere i fogli di lavoro con poche righe di codice. Spesso, si vorrebbe nascondere alcune fogli nella cartella di lavoro, in particolare quelli che contengono non formattato dati grezzi ei calcoli. Per nascondere un foglio di lavoro manualmente e senza l'uso di macro, è possibile fare clic destro sulla relativa scheda e selezionare "Hide" dal menu. Una semplice macro di commutazione consente di automatizzare questo compito, soprattutto se si ha a che fare con molti fogli di lavoro.

istruzione

1 Avviare Microsoft Excel. Premere il tasto "CTRL + O", selezionare la cartella di lavoro che contiene i fogli che desideri nascondere e quindi fare clic su "Apri".

2 Premere il tasto "ALT + F8" per aprire la finestra "Macro". Digitare "HideSheets" nella casella "Nome macro" e quindi fare clic su "Crea". Si apre l'editor VBA.

3 Immettere il seguente codice nell'editor di VBA.

HideSheets sub ()

wSheets = Array ( "Sheet1", "Sheet2", "Foglio3")

wsstat = fogli di lavoro (wSheets (0)). Visible

Se wsstat = xlSheetVisible Poi

wsstat = xlSheetHidden

Altro

wsstat = xlSheetVisible

Finisci se

Per n = 0 Per UBound (wSheets)

Worksheets(wSheets(n)).Visible = wsstat

Successivo n

End Sub

4 Sostituire "SHEET1", "Foglio2" e "Foglio3" con i nomi dei fogli che si desidera eliminare. È possibile aggiungere un altro foglio alla lista aggiungendo il suo nome racchiuso tra virgolette e preceduto da una virgola.

Consigli e avvertenze

  • È inoltre possibile utilizzare i numeri di indice per identificare i fogli di lavoro che si desidera eliminare. Ad esempio, se si desidera eliminare il primo e il terzo foglio di lavoro, sostituire i nomi dei fogli nel codice con "1" e "3" (senza virgolette).
  • Per impostazione predefinita, le macro sono disattivate in Microsoft Excel. Per consentire loro, fare clic sul pulsante Microsoft Office e poi andare a "Opzioni di Excel." Sulla sezione "popolare", selezionare "Mostra scheda Sviluppo sulla barra multifunzione." Vai a "Centro protezione," cliccare su "Impostazioni Centro fiducia" e quindi selezionare "Attiva tutte le macro" in "Impostazioni macro". Fai clic su "OK" per salvare le modifiche e riavviare Excel.