XL 2013 Afficher tout sauf deux feuilles

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 8 Décembre 2019

• #2

Bonjour Badraaliou,
Corrigez déjà la faute dans votre For Next : Execptions au lieu de Exceptions. Il est possible que ce soit l'origine.

 

Vote positif 0 Vote négatif

badraaliou4

XLDnaute Occasionnel

• 8 Décembre 2019

• #3

Re,
Merci.
J'ai remplacé
Exc = false par Exc = visible=xlsheetveryhidden
Exc = true par Exc= visible=xlsheetvisible
Sh.visible=IIf(Exc, xlsheetveryhidden,xlsheetvisible)
Et j'ai obtenu la solution.

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 8 Décembre 2019

• #4

et sans corriger le nom de la variable Execptions ?

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 8 Décembre 2019

• #5

Bonjour le fil, badraaliou4, sylvanu

Ma façon de masquer les feuilles sauf certaines.

VB:

Sub masquer()
Dim ws As Worksheet, Visibles
Visibles = Array("liste", "Members", "login")
For Each ws In Worksheets
ws.Visible = Not IsError(Application.Match(ws.Name, Visibles, 0))
Next
End Sub

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 8 Décembre 2019

• #6

Re

A la relecture du fil, ce serait plutôt

VB:

Sub Masquer_II()
Dim ws As Worksheet, NonVisibles
NonVisibles = Array("liste", "Members", "login")
For Each ws In Worksheets
ws.Visible = IsError(Application.Match(ws.Name, NonVisibles, 0))
Next
End Sub

 

Vote positif 0 Vote négatif

badraaliou4

XLDnaute Occasionnel

• 8 Décembre 2019

• #7

C'était une erreur de frappe
Mais l'erreur n'était pas dans mon code

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 8 Décembre 2019

• #8

Bonjour à toi aussi badraaliou4

Je suis invisible ou tu n'es pas réveillé?

 

Vote positif 0 Vote négatif

badraaliou4

XLDnaute Occasionnel

• 8 Décembre 2019

• #9

Merci
Mais est ce que les 3 feuilles seront masquer par veryhidden?

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 8 Décembre 2019

• #10

Re

Bah, essaies les deux macros que je te propose
Et redis-moi laquelle se rapproche du résultat escompté.

PS: Tu sais que selon le niveau de maîtrise de VBA de l'utilisateur final, que ce masquage ne sert pas à grand chose.
Il suffit d'ouvrir le classeur sans activer les macros.

 

Vote positif 0 Vote négatif