Masquer toutes les feuilles d'un classeur sauf "une"
1 réponse
Pierre Henri
Bonsoir,
J'ai un classeur avec une feuille "Alpha" et une vingtaine de feuilles
numéroté de 1 à 20...
Je souhaite en VBA masquer toutes les feuilles sauf "Alpha"
Je vous remercie
PH
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre Henri
Merci breaucoup Parfait ! Bonne soirée PH Neutre
Jacky a écrit :
Bonjour,
Ceci peut-être '---------------- Sub masquer() Dim sh As Worksheet For Each sh In Worksheets If sh.Name <> "Alpha" Then sh.Visible = False Next End Sub '-----------------
-- Salutations JJ
"Pierre Henri" <"PH Neutre"> a écrit dans le message de news: OIt9z2p% <mailto:OIt9z2p%... Bonsoir, J'ai un classeur avec une feuille "Alpha" et une vingtaine de feuilles numéroté de 1 à 20... Je souhaite en VBA masquer toutes les feuilles sauf "Alpha" Je vous remercie PH
Merci breaucoup
Parfait !
Bonne soirée
PH Neutre
Jacky a écrit :
Bonjour,
Ceci peut-être
'----------------
Sub masquer()
Dim sh As Worksheet
For Each sh In Worksheets
If sh.Name <> "Alpha" Then sh.Visible = False
Next
End Sub
'-----------------
--
Salutations
JJ
"Pierre Henri" <"PH Neutre"> a écrit dans le message de news:
OIt9z2p%23KHA.5464@TK2MSFTNGP05.phx.gbl
<mailto:OIt9z2p%23KHA.5464@TK2MSFTNGP05.phx.gbl>...
Bonsoir,
J'ai un classeur avec une feuille "Alpha" et une vingtaine de feuilles
numéroté de 1 à 20...
Je souhaite en VBA masquer toutes les feuilles sauf "Alpha"
Je vous remercie
PH
Ceci peut-être '---------------- Sub masquer() Dim sh As Worksheet For Each sh In Worksheets If sh.Name <> "Alpha" Then sh.Visible = False Next End Sub '-----------------
-- Salutations JJ
"Pierre Henri" <"PH Neutre"> a écrit dans le message de news: OIt9z2p% <mailto:OIt9z2p%... Bonsoir, J'ai un classeur avec une feuille "Alpha" et une vingtaine de feuilles numéroté de 1 à 20... Je souhaite en VBA masquer toutes les feuilles sauf "Alpha" Je vous remercie PH