XL 2019 activer une feuille cachée avec un lien hypertext dans une autre feuille en vba

nanodelune à dit:

bonjour, je ne suis pas un surdoué en VBA donc j'ai besoin d'aide.
J'ai créé des fiches de notation d'élèves par Exercice de TP.
et une fiche par élève que je voudrais cacher pour la clarté de l'utilisation
en gros, je créé un TP, cela me donne un formulaire de notation du TP avec les élèves concernés (selon la classe). pour accéder à la fiche élève à partir de mon formulaire TP, j'ai créé automatiquement un lien hypertext vers la fiche de l'élève.
si je cache les fiches élèves, les liens ne fonctionne plus.
ma question est: existe-t-il un code vba pour activer la fiche éleve lorsque je clique sur le lien Hypertext de cet élève dans ma fiche TP?
merci pour vos idées

Cliquez pour agrandir...

sylvanu à dit:

Bonsoir Nanodelube,
Un essai en PJ avec une gestion un peu différente.
On a une liste de prénoms, quend on clic sur un prénom toutes les feuilles sont masquées et la feuille correspondante est visible.
Quand on fait retour, on revient sur la feuille Entéte et le reste est masqué.
Avec :

Code:

Sub Worksheet_Activate() ' Exécutée sur selection feuille Entete
    MasqueTout
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range) ' Sur clic prénom
On Error GoTo Fin
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("C6:C11")) Is Nothing Then
        MasqueTout
        Sheets(Target.Value).Visible = Visible  ' Démasque la feuille qui porte le nom de la cellule cliquée
        Sheets(Target.Value).Select
    End If
Fin:
End Sub
Sub MasqueTout() ' Masque toutes les feuilles sauf Entete
    For Each F In Worksheets
        If F.Name <> "Entete" Then Sheets(F.Name).Visible = xlSheetVeryHidden
    Next F
End Sub

Cliquez pour agrandir...