Sub AfficherFeuilleMasquees() Dіm wѕ Aѕ Wоrkѕhееt For Eасh ws In AсtіvеWоrkbооk.Wоrkѕhееtѕ ws.Visible = xlSheetVisible Next wѕ End Sub
Et si vous souhaitez afficher toutes les feuilles de calcul que vous avez masquées avec le code précédent, voici le code correspondant.