Masquer feuilles sauf une Excel/VBA

Résolu
Franck -  
 Franck -
Bonjour,

J'ai déjà vu des topics de ce genre mais seulement en cas de fermeture du fichier...
Dans mon cas, j'aimerais pouvoir masquer des feuilles sauf une, choisie (target) selon ces lignes de code ci-après : 

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("C6")) Is Nothing Then
Sheets(Target.Value).Select
End If
End Sub


C6 étant ma liste déroulante où je choisis la feuille à afficher

Un exemple ci-dessous :

https://www.transfernow.net/?utm_source=partagefichierscom&utm_medium=download

Merci à tous


1 réponse

Réponse 1 / 1
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Vous rappelez le menu comment s'il est masque aussi??????????????????????
0
Franck
 
Non le menu ne doit pas être masqué !
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

fichier modidfie: https://mon-partage.fr/f/Jqbcn9cy/
0
Franck
 
merci c'est exactement que je voulais !
Par contre si je dispose de plusieurs menus, comment faire pour réaliser cette commande en fonction seulement de ce qu'il y a dans ce menu ?

fichier modifié : https://mon-partage.fr/f/k2Pyq792/
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,
Actuellement vous avez un choix fruit ou legume et un choix dans le type du premier choix en fonction de ca la feuille s'affiche. Vois pas ce que vous voulez!!!!
0
Franck
 
j'ai refait un exemple pour vous montrer ce que je souhaite : https://mon-partage.fr/f/k2Pyq792/
0