Come nascondere automaticamente fogli di lavoro specifici quando si apre un file Excel?
Se hai bisogno di nascondere automaticamente alcuni fogli di lavoro specifici quando qualcuno apre la cartella di lavoro, come potresti gestire questo lavoro in Excel?
Nascondi automaticamente un foglio di lavoro specifico all'apertura di una cartella di lavoro con codice VBA
Se si desidera nascondere un foglio di lavoro specifico all'apertura della cartella di lavoro, è possibile applicare il seguente codice VBA.
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Sulla sinistra Progetto-VBAProgetto fare doppio clic su Questa cartella di lavoro per aprire un modulo vuoto, quindi copia e incolla il codice seguente nel modulo:
Codice VBA: nasconde un foglio specifico all'apertura di una cartella di lavoro:
Private Sub Workbook_Open()
Sheets("Sheet5").Visible = False
End Sub
Note:: Nel codice sopra, Sheet5 è il nome del foglio che vuoi nascondere all'apertura. Si prega di modificarlo secondo le proprie necessità.
3. Quindi salva e chiudi questa finestra del codice e fai clic su Compila il > Salva con nome per salvare questa cartella di lavoro come Cartella di lavoro abilitata per Excel formato, vedi screenshot:
4. Alla successiva apertura di questa cartella di lavoro, fare clic su Abilitare il contenuto in primo luogo, quindi il foglio specificato verrà nascosto automaticamente.
Nascondi automaticamente alcuni fogli di lavoro specifici quando si apre una cartella di lavoro con codice VBA
Se ci sono più fogli di lavoro che devono essere nascosti quando si apre la cartella di lavoro, ecco anche un codice che può aiutarti.
1. Innanzitutto, dovresti elencare i nomi dei fogli che vuoi nascondere all'apertura in un elenco di un foglio di lavoro, quindi andare al Casella del nome per dare loro un nome di intervalloFogli da nasconderee premere entrare chiave, vedi screenshot:
2. Quindi tieni premuto il pulsante ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
3. Sulla sinistra Progetto-VBAProgetto fare doppio clic su Questa cartella di lavoro per aprire un modulo vuoto, quindi copia e incolla il codice seguente nel modulo:
Codice VBA: nascondi alcuni fogli di lavoro specifici all'apertura di una cartella di lavoro:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updateby Extendoffice 20161206
Dim ws As Worksheet
For Each ws In Worksheets
ws.Visible = xlSheetVisible
Next ws
End Sub
Private Sub Workbook_Open()
Dim ws As Worksheet
For Each ws In Worksheets
If WorksheetFunction.CountIf([SheetsToHide], ws.Name) > 0 Then
ws.Visible = xlSheetHidden
MsgBox ws.Name & "Has been hidden!", vbInformation, "Kutools for Excel"
Else
ws.Visible = xlSheetVisible
End If
Next ws
Set ws = Nothing
End Sub
Note:: Nel codice sopra, Fogli da nascondere è il nome dell'intervallo che hai creato nel passaggio 1.
4. Quindi salva e chiudi questa finestra del codice e fai clic su Compila il > Salva con nome per salvare questa cartella di lavoro come Cartella di lavoro abilitata per Excel formato. D'ora in poi, quando aprirai questa cartella di lavoro la prossima volta, i fogli di lavoro specificati verranno nascosti automaticamente.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!