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
Comunicati "Alt + F8 " per aprire le " macro " finestra. Digitare " HideSheets " nella casella " Nome macro " e quindi fare clic su "Crea ". Si apre l'editor di VBA .
3
Inserisci il seguente codice nell'editor di VBA .
HideSheets sub ()
wSheets
= array ( " SHEET1 " , " Foglio2 " , " Foglio3 " ) per
wsstat = Worksheets ( wSheets ( 0 ) ) .
Visibile
wsstat = xlSheetVisible Poi
wsstat = xlSheetHidden
Else
wsstat = xlSheetVisible
End If
Per n = 0 To UBound ( wSheets )
fogli di lavoro ( wSheets ( n) ) . Visible = wsstat
successiva n
End Sub
4
Sostituire " SHEET1 ", " Foglio2 " e " Foglio3 " con i nomi dei fogli che si desidera eliminare. Si può aggiungere un altro foglio per la lista aggiungendo il suo nome racchiuso tra virgolette e preceduto da una virgola .
software © www.354353.com