Hyperlink to hidden sheet

[Peter-Jan De Smedt]

Hi

I'm trying to put a hyperlink to a hidden sheet but doesn't work with below. Any suggestions anyone?


Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

Worksheets("Oranges Sold").Visible = xlSheetVisible

Sheets("Oranges Sold").Visible = True

Sheets("Oranges Sold").Select

End Sub

 

[Hui]

Peter


You can't hyperlink to a hidden sheet

That is the whole idea of it being hidden


You can link some text or a shape to a subroutine that unguided the sheet and changes to it

Use slightly modified code to what you already have


Sub accessWorksheet ()

Worksheets("Oranges Sold").Visible = xlSheetVisible

Worksheets("Oranges Sold").Select

End Sub