onglets cachés / visible quand clic

[ph.vanne]

Bonjour a tous ,

j'ai un fichier avec plusieurs onglet ,
le premier onglet est une liste de produits (Nom de la feuil "Liste des MP")
les autres onglets sont une fiche détaillée par produit (Nom de la feuil "produit A" ; "produit B" ; etc..

un clic sur le nom d'un des produit situés dans la feuille intitulée " liste des MP" me fait arriver directement sur l'onglet correspondant au produit, grâce a ce petit bout de code (que j'ai inséré dans ma feuil "liste des MP") :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Resume Next

ActiveWorkbook.Sheets(Target.Value).Activate

End Sub

et ça marche nickel..
sauf que j'aimerais cacher mes onglets (il y en a une trentaine a venir ..)
et qu ils n’apparaissent qu'au clic .
et qu a la fermeture du classeur tous re-disparaissent.(sauf " liste des MP " bien sur !)

d'avance merci !

phil.

 

[Robert]

Bonjour Phil, bonjour le forum,

Essaie comme ça. Dans l'onglet Liste des MP les deux macros événementielles Activate et SelectionChange :
asdff

Private Sub Worksheet_Activate()
Dim L As Worksheet
Dim O As Worksheet

Set L = Me
For Each O In Sheets
    If L.Name <> O.Name Then O.Visible = False
Next O
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
With Sheets(Target.Value)
    .Visible = True
    .Activate
End With
End Sub

Dans le composant ThisWorkbook la macro événementielle BeforeClose :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim L As Worksheet
Dim O As Worksheet

Set L = Worksheets("Liste des MP")
For Each O In Sheets
    If L.Name <> O.Name Then O.Visible = False
Next O
Me.Save
End Sub

 

[ph.vanne]

bonjour ,
ça marche .. presque !

en fait ,j'aimerais que les onglets sélectionnés dans "liste de MP" reste affichés :

- a l ouverture de mon fichier n’apparaît que "liste des mp" ,
-puis ,au fur et a mesure que je clic sur mes produits ils s'affichent les uns a coté des autre :

j'ai donc l onglet "liste des produits" puis a coté, (par exemple) les onglets : "produit A" ; "produite D" ; "produits G"

et a la prochaine ouverture ,de nouveau uniquement l onglet "liste des produit" .

 

[Robert]

Re,

Supprime la macro événementielle Activate de l'onglet Liste de MP... C'est elle qui masque les autres onglets.

 

[ph.vanne]

ça marche !
comme toujours des conseils et une réactivité au top !
merci beaucoup !
et bientôt pour de nouvelles aventures!