Mostrar hoja oculta y volver a ocultar con hipervínculos

Tengo un excel en hoja1 (informes) y en ella los hipervínculos a las otras hojas.

Si están visibles me llevan los hipervínculos a las hojas pero cuando están ocultas no lo hacen.

En hoja 1 tengo

Private Sub Worksheet_Activate()
Worksheets("Informes").Range("K5").Select
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("A2:A4")) Is Nothing Then
Worksheets(Target.Value).Range("Z1").Value = _
Worksheets(Target.Value).Visible
Worksheets(Target.Value).Visible = -1
Worksheets(Target.Value).Activate
End If
End Sub

y en el reto de las hojas ejemplo hoja2 (bandejas)

Private Sub Worksheet_Deactivate()
Worksheets("bandejas").Visible = Worksheets _
("bandejas").Range("Z1").Value
End Sub

Como hago para que funcionen los hipervínculos con las hojas ocultas.. ¿qué me falta?