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

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.