OVH Cloud OVH Cloud

Affichage multiple

4 réponses
Avatar
Claude
Bonjour,

Dans mes classeurs je suis amen=E9 =E0 masquer ou a afficher=20
r=E9guli=E8rement des feuilles. existe t-il une autre solution=20
que par le menu format/feuille qui ne me permet de les=20
ouvrir qu'une =E0 une ?

Merci d'avance

4 réponses

Avatar
Philippe.R
Bonjour Claude,
Tu peux l'automatiser à l'aide de l'enregistreur de macros (surtout si ce sont toujours les mêmes)
--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.

"Claude" a écrit dans le message de news:205c01c4a796$c32e2210$
Bonjour,

Dans mes classeurs je suis amené à masquer ou a afficher
régulièrement des feuilles. existe t-il une autre solution
que par le menu format/feuille qui ne me permet de les
ouvrir qu'une à une ?

Merci d'avance
Avatar
Claude
Merci Philippe,

en fait cette manipulation me sert pour de nombreux
classeurs et les feuilles ont des noms différents..
-----Message d'origine-----
Bonjour Claude,
Tu peux l'automatiser à l'aide de l'enregistreur de
macros (surtout si ce sont toujours les mêmes)

--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.

"Claude" a écrit dans le message de
news:205c01c4a796$c32e2210$

Bonjour,

Dans mes classeurs je suis amené à masquer ou a afficher
régulièrement des feuilles. existe t-il une autre solution
que par le menu format/feuille qui ne me permet de les
ouvrir qu'une à une ?

Merci d'avance


.



Avatar
Jacky
Bonjour Claude

Une piste peut-être.(un peu lourd, mais qui sait)
Avec une liste issue de donnée validation en A1 contenant les noms des
feuilles.
'----------
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
nom = [a1]
If Target = [a1] Then
If Sheets(nom).Visible = True Then
Sheets(nom).Visible = False
Else
Sheets(nom).Visible = True
End If
End If
End Sub
'----------
Salutations
JJ

"Claude" a écrit dans le message de
news:205c01c4a796$c32e2210$
Bonjour,

Dans mes classeurs je suis amené à masquer ou a afficher
régulièrement des feuilles. existe t-il une autre solution
que par le menu format/feuille qui ne me permet de les
ouvrir qu'une à une ?

Merci d'avance
Avatar
Claude
Merci Jacky,

en effet ce que je voudrais c'est une macro ??
indépendante du classeur ou se trouvent les feuilles, ce
qui me permettrait de l'utiliser pour d'autres classeurs
posédant eux aussi des feuilles cachées mais avec un autre
nom
-----Message d'origine-----
Bonjour Claude

Une piste peut-être.(un peu lourd, mais qui sait)
Avec une liste issue de donnée validation en A1 contenant
les noms des

feuilles.
'----------
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
nom = [a1]
If Target = [a1] Then
If Sheets(nom).Visible = True Then
Sheets(nom).Visible = False
Else
Sheets(nom).Visible = True
End If
End If
End Sub
'----------
Salutations
JJ

"Claude" a écrit dans le message de
news:205c01c4a796$c32e2210$
Bonjour,

Dans mes classeurs je suis amené à masquer ou a afficher
régulièrement des feuilles. existe t-il une autre solution
que par le menu format/feuille qui ne me permet de les
ouvrir qu'une à une ?

Merci d'avance


.