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

Masquer automatiquement certaines feuilles de calcul spécifiques lors de l'ouverture d'un classeur avec le code VBA

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.