+ Reply to Thread
Results 1 to 2 of 2

Hidden Pages to Appear on Hyperlink

Hybrid View

  1. #1
    Registered User
    Join Date
    05-16-2008
    Posts
    11

    Hidden Pages to Appear on Hyperlink

    Hi All!

    I'm hoping my question is a simple one - I was wondering if there is a way of making a hidden page appear when the user clicks a hyperlink to that page in a password protected worksheet/book?

    Thanks for the help again and have a great evening!

  2. #2
    Registered User
    Join Date
    10-04-2008
    Location
    uk
    Posts
    17

    Re: Hidden Pages to Appear on Hyperlink

    Create your hyperlink sheet then copy this code into the relevant sheet in VBA project, I've just used it and it works a treat

    Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
      Dim strAddress As String
    
    
      strAddress = _
      Application.Substitute(Target.SubAddress, "'", vbNullString)
      Worksheets(Left$(strAddress, _
      InStr(1, strAddress, "!") - 1)).Visible = xlSheetVisible
      Application.EnableEvents = False
      Target.Follow
      Application.EnableEvents = True
    
    
    End Sub
    if you then paste this into each individual sheet that you require to be hyperlinked it will hide them on selecting outside of that sheet, test it on your project though, works lovely on mine but their may be a prob i haven't experienced.
    Private Sub Worksheet_Deactivate()
    Me.Visible = xlSheetVeryHidden
    End Sub

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1