hyperlink / verborgen tabblad

Dag Ronald,

Het is mogelijk, alleszins met Excel 2016, ik kan me niet meer uitspreken over vorige versies. 

Het lijkt me wel een eigenaardige vraag om hyperlinks naar een verborgen tab te dirigeren.

Wat meer uitleg over de bedoeling zou kunnen helpen om met betere oplossingen te komen.

Plaats onderstaande code in ThisWorkbook:

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)

   Application.EnableEvents = False

   If Sheets(Split(Target.SubAddress, "!")(0)).Visible = False Then

      Sheets(Split(Target.SubAddress, "!")(0)).Visible = True

      Sh.Range(Target.Range.Address).Hyperlinks(1).Follow

   End If

   Application.EnableEvents = True

End Sub

Dag JP,

Je hebt misschien wel gelijk dat het vreemd is.

Ik wil eigenlijk dat de gebruikers maar één tabblad zien.

En dat ze hier vandaan dan verder kunnen via een hyperlink.

Ik ben totaal nieuw met vba.

Ik neem aan dat ik in je code de hyperlink ook een naam moet geven, zodat die de betreffende hyperlink ook kan vinden ?

Ronald

Dag Ronald,

Ik had al zo'n vermoeden...

Nee, je hoeft de hyperlink niet in de code op te nemen, de code vist hetzelf wel uit waar naartoe.

Het is een typische beginnersfout - geen verwijt hoor - dat de programmeur wilt weten waar naartoe terwijl het volstaat als de code maar weet waar naartoe. (En God weet dat ik me ook daaraan bezondigd heb.)

In Target.SubAddress zit eigenlijke alle info die we nodig hebben waar we ook zijn en welke hyperlink ook we klikken.

Om de hyperlink te laten werken moeten we natuurlijk eerst checken op de tab zichtbaar is of niet.

Stel je hyperlink verwijst naar: Blad1!A1.

Met Split(Target.SubAddress, "!")(0) bekomen we Blad1. De SPLIT functie levert eigenlijk een variant:

variant(0)=Blad1

variant(1)=A1

Met de (0) achter de SPLIT bekomen we direct Blad1.

Maar genoeg theorie, ik heb een klein model gemaakt dat je hier kunt ophalen:

https://1drv.ms/x/s!AmIR8Z3XdrKRkh0h5ZJl13dJoq7W

Het gebruik lijkt me duidelijk maar mocht je vragen hebben hoor ik het wel.

Dank je wel, JP.

Maar als ik op de link klik, dan gaat hij niet naar blad 2 en 3.

Op het moment dat ik de bladen zichtbaar maak, dan werkt het wel.

Ronald

Dag Ronald,

Mogelijks moet je macros activeren.

Opties, Trust Center, macro settings, enable....