Une macro Excel pour tout masquer sauf la feuille de calcul active

Vous voudrez peut-être masquer les feuilles de calcul inactives avec cette macro. Excel ne vous permet pas de masquer toutes les feuilles d'un classeur ; au moins un doit être affiché. Cependant, vous pouvez tout masquer sauf la feuille active.

Comment fonctionne la macro

La macro ici parcourt les feuilles de calcul et fait correspondre chaque nom de feuille de calcul au nom de la feuille active. Chaque fois que la macro boucle, elle masque toute feuille de calcul sans correspondance.

Sous-Macro1()
'Étape 1 : Déclarez vos variables
    Dim ws As Feuille de calcul
'Étape 2 : Commencez à parcourir toutes les feuilles de calcul
    Pour chaque ws dans ThisWorkbook.Worksheets
'Étape 3 : Vérifiez le nom de chaque feuille de calcul
    Si ws.Name <> ThisWorkbook.ActiveSheet.Name Then
'Étape 4: Cacher la feuille
    ws.Visible = xlSheetHidden
    Fin si
'Étape 5 : Boucle vers la feuille de calcul suivante
    WS suivant
Fin du sous-marin

L'étape 1 déclare un objet appelé ws. Cette étape crée un conteneur de mémoire pour chaque feuille de calcul parcourue par la macro.

L'étape 2 commence la boucle, indiquant à Excel d'évaluer toutes les feuilles de calcul de ce classeur. Notez la différence entre ThisWorkbook et ActiveWorkbook. L'objet ThisWorkBook fait référence au classeur qui contient le code. L'objet ActiveWorkBook fait référence au classeur actuellement actif. Ils renvoient souvent le même objet, mais si le classeur exécutant le code n'est pas le classeur actif, ils renvoient des objets différents. Dans ce cas, vous ne voulez pas risquer de cacher des feuilles dans d'autres classeurs, vous utilisez donc ThisWorkBook.

À l'étape 3, la macro compare simplement le nom de la feuille active à la feuille actuellement bouclée.

Si les noms de feuille sont différents, la macro masque la feuille à l'étape 4.

À l'étape 5, vous revenez en arrière pour obtenir la feuille suivante. Une fois toutes les feuilles évaluées, la macro se termine.

Notez que vous utilisez xlsheetHidden dans votre macro. Cette propriété applique l'état de masquage par défaut que vous obtiendriez normalement lorsque vous cliquez avec le bouton droit sur une feuille et sélectionnez Masquer. Dans cet état de masquage par défaut, un utilisateur peut cliquer avec le bouton droit sur n'importe quel onglet et choisir Afficher, qui affiche toutes les feuilles masquées. Mais un autre état caché est plus clandestin que le défaut. Si vous utilisez xlSheetVeryHidden pour masquer vos feuilles, les utilisateurs ne pourront pas les voir du tout, même s'ils cliquent avec le bouton droit sur un onglet et choisissent Afficher. La seule façon d'afficher une feuille masquée de cette manière est d'utiliser VBA.

Comment utiliser la macro

Pour implémenter cette macro, vous pouvez la copier et la coller dans un module standard :

Activez Visual Basic Editor en appuyant sur Alt+F11.

Cliquez avec le bouton droit sur le nom du projet/classeur dans la fenêtre du projet.

Choisissez Insertion → Module.

Tapez ou collez le code dans le module nouvellement créé.

Leave a Comment

Comment définir les options de vérification linguistique de Word 2010

Comment définir les options de vérification linguistique de Word 2010

Découvrez comment configurer les options de vérification linguistique dans Word 2010 pour améliorer votre rédaction et éviter les erreurs.

Comment utiliser la fonction CONFIANCE dans Excel

Comment utiliser la fonction CONFIANCE dans Excel

Découvrez comment utiliser les fonctions CONFIDENCE.NORM et CONFIDENCE.T dans Excel pour calculer des intervalles de confiance pour les moyennes de population, améliorant ainsi la prise de décision basée sur des données.

Formater les nombres en milliers et en millions dans les rapports Excel

Formater les nombres en milliers et en millions dans les rapports Excel

Améliorez la lisibilité de vos rapports Excel en formatant vos chiffres en milliers ou millions avec des astuces simples et efficaces pour votre audience.

Comment personnaliser vos étiquettes de données de graphique croisé dynamique Excel

Comment personnaliser vos étiquettes de données de graphique croisé dynamique Excel

Apprenez comment personnaliser vos étiquettes de données dans Excel pour un meilleur rapport. Utilisez les valeurs de votre tableau croisé dynamique efficacement.

Comment créer une application Web Access

Comment créer une application Web Access

Découvrez comment créer une application Web dans Access 2016. Apprenez les étapes essentielles pour développer votre application en ligne facilement.

Comment utiliser les commentaires dans Microsoft Word 2019

Comment utiliser les commentaires dans Microsoft Word 2019

Découvrez comment ajouter, répondre, afficher et supprimer des <strong>commentaires dans Microsoft Word</strong> 2019 pour optimiser votre collaboration.

Feuille intelligente 9.1.1

Feuille intelligente 9.1.1

Smartsheet est une plateforme de travail dynamique qui vous permet de gérer des projets, de créer des flux de travail et de collaborer avec votre équipe.

SharePoint

SharePoint

SharePoint est un système de collaboration basé sur le Web qui utilise une variété d'applications de flux de travail, des bases de données de « liste » et d'autres composants Web, ainsi que des fonctionnalités de sécurité pour donner le contrôle aux groupes professionnels qui travaillent ensemble.

Calendrier perpétuel 1.0.38/1.0.36

Calendrier perpétuel 1.0.38/1.0.36

Van Nien Calendar est une application d'affichage de calendrier sur votre téléphone, vous aidant à voir rapidement la date luni-solaire sur votre téléphone, organisant ainsi votre travail important.

Microsoft Outlook 2021

Microsoft Outlook 2021

Microsoft Outlook est une application commerciale et de productivité développée par Microsoft Corporation.