syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

[ddl33160]

Bonjour,

je voudrais connaître la syntaxe pour afficher plusieurs onglets à l'ouverture d'un fichier, aujourd'hui je ne peux en afficher qu'un avec ce code et je voudrais mettre un second onglet avec Else ? Comment faire ?

Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name <> "configuration" And "indicateurs mensuel" Then ws.Visible = False


Next ws
End Sub

 

[CHALET53]

Re : syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

Bonjour,

la procédure est dans l'esprit (déjà, il faut écrire : ws.Name <> "configuration" And ws.Name<> "indicateurs mensuel")

Pour rendre visible, il faut remplacer False par True
A toi de trouver la bonne combinaison en fonction de ce que tu veux

Sub essai()
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Name <> "Feuil1" Or ws.Name <> "liste_déroulante" Then ws.Visible = True

Next ws
End Sub

 

[ddl33160]

Re : syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

merci pour votre réponse

cela ne fonctionne pas, quelque chose m'échappe
il accepte cette syntaxe, c'est déjà un plus mais mon 2ème onglet ne s'affiche pas...
il n'y a que le 1er qui s'affiche


etes vous toujours là ?

 

[CHALET53]

Re : syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

Un petit fichier présentant ton cas serait plus facile à interpréter

a+

 

[Si...]

Re : syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

salut

Si... tu regardes dans la liste des propriétés, "Visible" te donne les options.
Sachant que True= -1 et False= 0, essaie

Dim ws As Worksheet
For Each ws In Worksheets
  ws.Visible = ws.Name <> "configuration" And ws.Name <> "indicateurs mensuel"
Next

Si... tu veux l'option "xlSheetVeryHidden"

Dim ws As Worksheet
For Each ws In Worksheets
  ws.Visible = IIf(ws.Name = "configuration" Or ws.Name = "indicateurs mensuel", 2, -1)
Next

 

[ddl33160]

Re : syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

Bonjour,

Voici le fichier, merci pour votre aide

 

[ddl33160]

Re : syntaxe VBA pour afficher plusieurs onglets à l'ouverture d'un fichier

Bonjour,

ça ne focntionne pas, j'ai joint un fichier, peux tu regarder ?
merciiiiiiiiiiiii