Macro pour afficher toutes les feuilles de calcul masquées, Excel VBA

Les draps de table cachés sont souvent oubliés. Ces feuilles de calcul cachées dorment ensuite dans les classeurs pendant des années. Un jour, vous avez découvert que des feuilles de tableau étaient cachées dans le classeur. La coïncidence peut, par exemple, consister au fait que vous sélectionnez la commande IMPRIMER dans le menu FICHIER et que vous sélectionnez l’option ENTIER DOSSIER DE TRAVAIL dans la boîte de dialogue d’impression. Cette option imprime à la fois les feuilles visibles et masquées d’un classeur.

Vous devez donc écrire une macro qui rend à nouveau visible toutes les feuilles de tableau du classeur actif.

Sub afficherlesfeuillesmasquees ()
Dim mafeuille As Worksheet
  For Each mafeuille In Sheets
   mafeuille.Visible = True
  Next mafeuille
End Sub

Dans une boucle For Each Next, définissez la propriété Visible de toutes les feuilles de calcul sur la valeur True.

S’abonner
Notifier de
0 Commentaires
le plus ancien
le plus récent le plus populaire
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x