Affichage de plusieurs onglets à condition d'en sélectionner préalablement un autre

[Grassou]

Bonjour à tous,

Je travaille sur un fichier Excel comprenant de nombreux onglets, disons feuil1, feuil2, feuil3, feuil4.

Pour rendre l'usage du fichier moins lourd je souhaite que certains onglets restent masqués (feuil3 et feuil4) jusqu'à ce qu'un autre onglet (feuil1 qui est toujours affiché) soit sélectionné.
De plus une fois les onglets feuil3 et feuil4 apparus je souhaiterais qu'ils soient masqués à nouveau une fois l'onglet feuil2 sélectionné.

Voici le code que j'ai amorcé mais qui évidemment ne fonctionne pas :
Sub test()
If Sheets("Feuil1").Select Then
Sheets("Feuil2").Visible = True
Else
Sheets("Feuil2").Visible = False
End If
End Sub

A votre bon coeur ! En espérant avoir été clair.

 

[Pierrot93]

Re : Affichage de plusieurs onglets à condition d'en sélectionner préalablement un au

Bonjour,

essaye ceci pour le test :

If ActiveSheet.Name = "Feuil1" Then

bon après midi
@+

 

[camarchepas]

Re : Affichage de plusieurs onglets à condition d'en sélectionner préalablement un au

Bonjour Grassou , Re Pierrot ,


Voici en utilisant les évenementielles de la feuil1

 

[Grassou]

Re : Affichage de plusieurs onglets à condition d'en sélectionner préalablement un au

Merci à vous
Vous assurez !!