Ga naar inhoud

Welkom op PC Helpforum!
PC Helpforum helpt GRATIS computergebruikers sinds 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!


VBANoob1

Hyperlink/zichtbare/onzichtbare sheets

Aanbevolen berichten

Hallo allemaal! 

 

Dus, ik heb meerdere vellen die zichtbaar zijn en ook meerdere verborgen. Al deze velllen hebben hyperlinken naar elkaar en weer terug en vice versa. Dankzij een mooie online tutorial heb ik een code in elkaar kunnen zetten om van zichtbare sheets te linken naar verborgen en terug en dat deze dan ook weer verdwijnen. Dat werkt bijna perfect (kan niet hyperlinken naar sheets met nummers in de titel, maar dat overleef ik wel). 

 

Mijn vraag, als vba groentje, is dat ik ook wil linken naar websites (zonder dat de sheet dan verdwijnt) en hyperlinken naar informatie binnen dezelfde sheet (zijn grote sheets). Echter, met de code die ik gebruik verdwijnt de sheet na het klikken op een hyperlink, dus ook als die hyperlink eigenlijk moet leiden naar een plek op die sheet. Hoe kan ik de code aanpassen zodat:

 

1) ik nog steeds kan hyperlinken naar verborgen paginas en terug en dat ze dan weer verdwijnen

2) kan hyperlinken naar websites zonder dat ze verwijnen

3) kan hyperlinken binnen dezelfde sheet zonder te verdwijnen

 

Dit is de code die ik nu aan het gebruiken ben:



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
Target.Parent.Worksheet.Visible = False
End If


End Sub

 

Alvast dank en excuus, nog niet erg goed hierin.

Deel dit bericht


Link naar bericht
Delen op andere sites


Doe mee aan dit gesprek

Je kunt dit nu plaatsen en later registreren. Indien je reeds een account hebt, log dan nu in om het bericht te plaatsen met je account.

Gast
Reageer op dit topic

×   Geplakt als verrijkte tekst.   Plak in plaats daarvan als platte tekst

  Er zijn maximaal 75 emoji toegestaan.

×   Je link werd automatisch ingevoegd.   Tonen als normale link

×   Je vorige inhoud werd hersteld.   Leeg de tekstverwerker

×   Je kunt afbeeldingen niet direct plakken. Upload of voeg afbeeldingen vanaf een URL in


Logo

OVER ONS

PC Helpforum helpt GRATIS computergebruikers sinds juli 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!

×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.