Masque un onglet en fonction d'une valeur d'une cellule
Sean81
-
ccm81 Messages postés 11033 Statut Membre -
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
J'ai beau fouiller sur internet et je trouve pas ma solution.
J'ai un onglet principal qui a une liste de chantier et je créé un onglet pour chaque chantier.
Je souhaiterai cacher l'onglet du chantier en question dès que je rempli dans une cellule " Terminé" et qu'il sois réaffiché si je remets " En cours".
Dans l'onglet principal , en colonne A : nom du chantier , en colonne B : Statut (en cours ou terminé) cette cellule est recopié dans chaque onglet pour faire un point de référence.
J'aimerai avoir un code générique qui se copie tout seul à chaque copier/coller de chaque onglet afin qu'automatiquement dès que je finis un chantier et que j'ai saisie dans l'onglet principal : terminé, il soit masqué et si c'est "en cours" il soit visible.
Pouvez vous m'aider.
Merci par avance
Mathieu
J'ai beau fouiller sur internet et je trouve pas ma solution.
J'ai un onglet principal qui a une liste de chantier et je créé un onglet pour chaque chantier.
Je souhaiterai cacher l'onglet du chantier en question dès que je rempli dans une cellule " Terminé" et qu'il sois réaffiché si je remets " En cours".
Dans l'onglet principal , en colonne A : nom du chantier , en colonne B : Statut (en cours ou terminé) cette cellule est recopié dans chaque onglet pour faire un point de référence.
J'aimerai avoir un code générique qui se copie tout seul à chaque copier/coller de chaque onglet afin qu'automatiquement dès que je finis un chantier et que j'ai saisie dans l'onglet principal : terminé, il soit masqué et si c'est "en cours" il soit visible.
Pouvez vous m'aider.
Merci par avance
Mathieu
3 réponses
-
Bonjour
Un début de réponse à adapter
https://mon-partage.fr/f/94XPsFGJ/
Cdlmnt -
De rien
Il faudrait quand même y ajouter le traitement d'erreur en cas de nom de feuille incorrect
Si c'est fini, peux tu mettre le sujet à résolu (en dessous du titre de ton premier message)
Cdlmnt -
ok, coupes la ligne en deux
If Target.Count > 1 Then Exit Sub
If Target.Value = "" Then Exit Sub
Cdlmnt