How do I hyperlink to a hidden tab, then hide that tab again.

I have built a database with separate notes pages (worksheet) for each entry. There are 950 different entries at current so I want to hide the 950 additional worksheets and just keep the main database visible. I have been using the following code to allow the hyperlinks to work when the tabs are hidden:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

If Not beenThere Then
beenThere = True
Sheet2.Visible = True
Sheet3.Visible = True
Sheet4.Visible = True
Sheet5.Visible = True
End If
beenThere = False
End Sub

and so on for each of the sheets, however when I follow a hyperlink it makes all the tabs visible again. With so many worksheets I do not want this to happen.

How can I keep the worksheets hidden?

Try this...

Please Login or Register  to view this content.

You have two procedures called Worksheet_FollowHyperlink. There can only be one. Keep the one I gave.