Code Vba Pour masquer les Feuilles [Résolu]

Réponse 2 / 10

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 janv. 2008 à 20:52

Bonjour,

Worksheets("Feuil2").visible=0

pour rendre visible
Worksheets("Feuil2").visible=

Amaniks
22 déc. 2015 à 16:05

Bravo! Je suis satisfait.

Réponse 3 / 10

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 janv. 2008 à 21:33

re,

En supposant que ta feuille principale est la première concue et la première du classeur

Sub masquer()
Dim nbre As Byte, cptr As Byte

Application.ScreenUpdating = False

nbre = ThisWorkbook.Sheets.Count
cptr = 2
For cptr = 2 To nbre
Sheets(cptr).Visible = 0
Next

Application.ScreenUpdating = False

End Sub

Réponse 4 / 10

gham Messages postés 48 Date d'inscription samedi 8 décembre 2007 Statut Membre Dernière intervention 7 novembre 2021 5
16 janv. 2008 à 21:59

Oui c'est ça Merci, mais en allant au format/Feuille/ on trouve les feuilles masquées, ce que je veux qu'elles soient aussi masquer dans Formt/Feuille.

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 10

Edouard
20 août 2014 à 12:50

Juste une petite précision (suite à problème rencontré) : Excel a besoin de garder toujours au moins une feuille visible.

Dans mon cas, il y avait 2 feuilles (test et résultat) : il faut donc prévoir dans sa macro d'afficher la seconde feuille avant de masquer la première; sinon cela bugge.

Réponse 6 / 10

gham Messages postés 48 Date d'inscription samedi 8 décembre 2007 Statut Membre Dernière intervention 7 novembre 2021 5
16 janv. 2008 à 21:02

Merci ami
mais je veux un code pour masquer toutes les feuilles du ckasseur qui contient plus de 20 feuilles.
Toutes les feuilles à la fois sauf bien sûr la principale

Réponse 7 / 10

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 janv. 2008 à 22:22

Exact, Merci Eric

Réponse 8 / 10

Beckett299
16 avril 2010 à 02:41

Salut, je pense que le second "Application.ScreenUpdating" devrait être rétabli par "= True".
Ce qui donne :

_______________________________________

Sub masquer()

Dim nbre As Byte, cptr As Byte

Application.ScreenUpdating = False
nbre = ThisWorkbook.Sheets.Count
cptr = 2
For cptr = 2 To nbre
Sheets(cptr).Visible = xlSheetVeryHidden
Next
Application.ScreenUpdating = True

End Sub
_______________________________________

Bon codage à tous !

Beckett299

Réponse 9 / 10

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
16 avril 2010 à 08:55

bonjour

quelle réactivité! 2 ans après!

je pense que le second "Application.ScreenUpdating" devrait être rétabli par "= True".

Tu penses mal.

Si la macro rend la main au systeme, il n'est pas nécessaire de rétablir à "true"

Consulte cet article de Laurent Longre:
http://xcell05.free.fr/pages/prog/accvba.htm

chouba
24 juin 2010 à 12:58

comment faire si les feuilles ont des noms et pas des numéros?
merci

Réponse 10 / 10

Niconick
13 janv. 2017 à 13:43

... ou alors créer une feuille vide (remplie d'un joli gris, par exemple) et masquer la(les) feuille(s) sur la(es)quelle(s) on travaille ^^

Code Vba Pour masquer les Feuilles

10 réponses

Discussions similaires

Newsletters