XL 2016 code pour masquer les onglets sauf la page d’accueil

TooFatBoy

XLDnaute Barbatruc

• 9 Avril 2022

• #2

Bonjour,

VB:

Sub Masquer()
    For Each sh In Worksheets
        If sh.Name <> "O" Then sh.Visible = False
    Next sh
End Sub

 

Vote positif 0 Vote négatif

S

Seddiki_adz

XLDnaute Impliqué

• 9 Avril 2022

• #3

Marcel32 à dit:

Bonjour,

VB:

Sub Masquer()
    For Each sh In Worksheets
        If sh.Name <> "O" Then sh.Visible = False
    Next sh
End Sub

Cliquez pour agrandir...

Merci
et comment afficher les autres onglet

 

Pièces jointes

• Masquage.xls

  50 KB · Affichages: 5

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 9 Avril 2022

• #4

Pour démasquer tous les onglets :

VB:

Sub Demasquer()
    For Each sh In Worksheets
        sh.Visible = True
    Next sh
End Sub

 

Vote positif 0 Vote négatif

Solution

S

Seddiki_adz

XLDnaute Impliqué

• 9 Avril 2022

• #5

Marcel32 à dit:

Pour démasquer tous les onglets :

VB:

Sub Demasquer()
    For Each sh In Worksheets
        sh.Visible = True
    Next sh
End Sub

Cliquez pour agrandir...

j'ai utiliser le code masquer les lien yhpertexte ne fonctionne plus ?

 

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 9 Avril 2022

• #6

Aucun problème chez moi, les liens hypertexte fonctionnent toujours.

 

Vote positif 0 Vote négatif

S

Seddiki_adz

XLDnaute Impliqué

• 9 Avril 2022

• #7

chez moi non plus

 

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 9 Avril 2022

• #8

Il n'y a aucune raison pour les liens hypertexte ne fonctionnent plus.

 

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 9 Avril 2022

• #9

Ca n'a rien à voir, mais je me pose quand même une question : vu que tu as Excel 2016, pourquoi enregistrer tes classeurs au format obsolète Excel 97-2003 ???

 

Vote positif 0 Vote négatif

S

Seddiki_adz

XLDnaute Impliqué

• 9 Avril 2022

• #10

Marcel32 à dit:

Ca n'a rien à voir, mais je me pose quand même une question : vu que tu as Excel 2016, pourquoi enregistrer tes classeurs au format obsolète Excel 97-2003 ???

Cliquez pour agrandir...

Merci

 

Vote positif 0 Vote négatif