Bonjour, Bonjour Lermite,
Un petit code pour pallier aux feuilles masquées et surtout pour xlveryhidden.
Fonctionnel sous Excel 2010, à tester sous 2003
C'est ma petite contribution du jour
Cdlt
Option Explicit
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
With Sheets(Split(Target.SubAddress, "!")(0))
If .Visible = xlVeryHidden Then
.Visible = True
End If
Application.Goto .Range(Split(Target.SubAddress, "!")(1))
End With
End Sub