Hyperlink for hidden sheets

Hello, I'm trying to figure out how to make -not visible- hidden sheets but make the hyperlinks accessible to those of them who are linked

In particular as per the attached doc, the active hyperlink referencing to the hidden sheet does not work

Let me add that in the hidden sheet there is also a "return" button to return to the starting form, I do not know if this element requires an additional step

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Hyperlinks.Count = 1 Then
If InStr(1, Target.Hyperlinks(1).SubAddress, "!", vbBinaryCompare) > 0 Then
    nomfeuille = Mid(Target.Hyperlinks(1).SubAddress, 1, InStr(1,
Target.Hyperlinks(1).SubAddress, "!", vbBinaryCompare) - 1)
    If Sheets(nomfeuille).Visible = xlVeryHidden Then
        Sheets(nomfeuille).Visible = Visible
    End If
    DoEvents
Application.Goto
Sheets(nomfeuille).Range(Target.Item(1).Hyperlinks(1).SubAddress), True
End If
End If
End Sub

P.S. I found this code on the web but I don't know how to change it hence I can not make it usable for me

You really don't need all that.

In the worksheet selection change event put

if target.value = "$A$1" then    ' where $A$1 is your cell address
     sheets("sheetname").visible = true      ' where sheetname is the name of the hidden worksheet
     sheets("Sheetname").select
end if

and in the code for your 'back' button add

sheets("sheetname").visible = false

In other words, you only care about where the user has clicked, not what's in the cell.

Hi and thanks for quick answer

I've applied for requested topics but it seems something is not working.