Masquer les onglets

BOCARAMEL

XLDnaute Occasionnel

• 27 Juillet 2009

• #2

Re : Masquer les onglets

bonsoir Magic_Doctor 🙂

essai ça

ActiveWindow.DisplayWorkbookTabs = False

cdlt 😉
bocaramel

 

Vote positif 0 Vote négatif

Etienne2323

XLDnaute Impliqué

• 27 Juillet 2009

• #3

Re : Masquer les onglets

Salut Magic_Doctor, le forum,
pour ma part, j'utilise ceci pour masquer un onglet :

Code:

Sheets("Ta_Feuille").Visible = False

Le true le rend visible de nouveau.

En le faisant avec une boucle, ça donne la possibilité de choisir les onglets à masquer et ceux à laisser démasqués.

Exemple :

Code:

DernierOnglet = Application.Sheets.Count
For i = 1 to DernierOnglet
     If Sheets(i).Name <> "Une condition" Then
          Sheets(i).Visible = False
     End if
Next i

Cordialement,

Étienne

 

Dernière édition: 27 Juillet 2009

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 27 Juillet 2009

• #4

Re : Masquer les onglets

Bonjour Bocaramel,

Muchas gracias, ça marche parfaitement !

Bonne fin de journée

 

Vote positif 0 Vote négatif

shmider

XLDnaute Occasionnel

• 14 Août 2009

• #5

Re : Masquer les onglets

Bonjour tout le monde,

En fait, quand je masque une feuille avec le code :

Sheets("Ta_Feuille").Visible = False

Je n'arrive plus à y accéder à partir d'un bouton !!

comment faire pourque je puisse y accéder à l'aide d'un bouton VBA et uniquement un bouton?

Merci à vous,
Merci au forum.
@+ 😱

Magic_Doctor à dit:

Bonjour Bocaramel,

Muchas gracias, ça marche parfaitement !

Bonne fin de journée

Cliquez pour agrandir...

 

Vote positif 0 Vote négatif

shmider

XLDnaute Occasionnel

• 14 Août 2009

• #6

Re : Masquer les onglets

Re,

j'ai trouvé, il faut mettre avant l'activation de la feuille Sheets("ma sheet").Visible = True

;-)

@+

 

Vote positif 0 Vote négatif