Comment masquer automatiquement des feuilles de calcul spécifiques lors de l'ouverture d'un fichier Excel?
Si vous devez masquer automatiquement certaines feuilles de calcul spécifiques lorsque quelqu'un ouvre le classeur, comment pouvez-vous gérer ce travail dans Excel?
Masquer automatiquement une feuille de calcul spécifique lors de l'ouverture d'un classeur avec le code VBA
Si vous souhaitez masquer une feuille de calcul spécifique lors de l'ouverture du classeur, vous pouvez appliquer le code VBA suivant.
1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. À gauche Projet-VBAProjet volet, double-cliquez sur le Ce classeur pour ouvrir un module vide, puis copiez et collez le code suivant dans le module:
Code VBA: masquez une feuille spécifique lors de l'ouverture d'un classeur:
Private Sub Workbook_Open()
Sheets("Sheet5").Visible = False
End Sub
Notes: Dans le code ci-dessus, Sheet5 est le nom de la feuille que vous souhaitez masquer à l'ouverture. Veuillez le modifier selon vos besoins.
3. Ensuite, enregistrez et fermez cette fenêtre de code, puis cliquez sur Déposez votre dernière attestation > Enregistrer sous pour enregistrer ce classeur sous Cahier de travail Excel avec macro-activé format, voir capture d'écran:
4. Lorsque vous ouvrirez ce classeur la prochaine fois, cliquez sur Autoriser le contenu bouton d'abord, puis votre feuille de spécification sera masquée automatiquement.
Masquer automatiquement certaines feuilles de calcul spécifiques lors de l'ouverture d'un classeur avec le code VBA
Si plusieurs feuilles de calcul doivent être masquées lors de l'ouverture du classeur, voici également un code qui peut vous aider.
1. Tout d'abord, vous devez répertorier les noms de feuille que vous souhaitez masquer lors de l'ouverture dans une liste d'une feuille de calcul, puis accéder à la Boîte de nom pour leur donner un nom de plage-FeuillesÀMasqueret appuyez sur Entrer clé, voir capture d'écran:
2. Puis maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
3. À gauche Projet-VBAProjet volet, double-cliquez sur le Ce classeur pour ouvrir un module vide, puis copiez et collez le code suivant dans le module:
Code VBA: masquez certaines feuilles de calcul spécifiques lors de l'ouverture d'un classeur:
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
Notes: Dans le code ci-dessus, FeuillesÀMasquer est le nom de plage que vous avez créé à l'étape 1.
4. Ensuite, enregistrez et fermez cette fenêtre de code, puis cliquez sur Déposez votre dernière attestation > Enregistrer sous pour enregistrer ce classeur sous Cahier de travail Excel avec macro-activé format. À partir de maintenant, lorsque vous ouvrirez ce classeur la prochaine fois, les feuilles de calcul spécifiées seront automatiquement masquées.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
