Brad was kind enough to provide the code below to hyperlink to a hidde
sheet. However it is not working. The link only works when the shee
I'm linking to is not hidden. Please help.
"Put this code in the worksheet module that has the hyperlink(s).
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Worksheets(Left(Target.SubAddress, InStr(1, Target.SubAddress, "!")
1)).Visible = xlSheetVisible
Application.EnableEvents = False
Target.Follow
Application.EnableEvents = True
End Sub
--
Message posted from
http://www.ExcelForum.com