Hi,
i want to create hyperlink that link to hidden worksheet. i already find the vba code for that but its only for word (assign to word) not for the object like button that i created(not userform button). i try to assign that code to object before but its doesnt work.
i need your help to make it.
**code for main worksheet
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
LinkTo = Target.SubAddress
WhereBang = InStr(1, LinkTo, "!")
If WhereBang > 0 Then
Mysheet = Left(LinkTo, WhereBang - 1)
Worksheets(Mysheet).Visible = True
Worksheets(Mysheet).Select
MyAddr = Mid(LinkTo, WhereBang + 1)
Worksheets(Mysheet).Range(MyAddr).Select
End If
End Sub
**code for hidden worksheet
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Worksheets("main menu").Select
Target.Parent.Worksheet.Visible = False
End Sub