• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Hyperlink naar tabblad van set gegevens

Status
Niet open voor verdere reacties.

youdeni

Gebruiker
Lid geworden
28 feb 2008
Berichten
147
Beste,

Ik heb in kolom A een set van gegevens. De waarde van cel A1 is gelijk aan de naam van een tabblad, De waarde van cel A2 is gelijk aan de naam van een tabblad enz. Nu zou ik graag willen dat via een VBA code automatisch van alle waarde in kolom een hyperlink wordt gemaakt naar de gelijknamige tabblad.
Ik heb een voorbeeld bestand toegevoegd.
 

Bijlagen

Kan ook met een enkele klik:
Code:
Private Sub Worksheet_selectionChange(ByVal Target As Range)
    If Target.Column = 1 And Target.Value <> "" Then
        If Evaluate("ISREF('" & Target.Value & "'!A1)") Then Sheets(Target.Value).Select
    End If
End Sub
 
Laatst bewerkt:
Hier heb je nog een andere manier
Voor uw andere vraag, ik zal het morgen eens nader bekijken maar mijn eerste indruk is: ik vrees ervoor.
 

Bijlagen

Hier een mogelijkheid conform de vraag.
Code:
Sub hsv()
Dim cl As Range
 For Each cl In Sheets("index").Cells(1).CurrentRegion.Resize(, 1)
  cl.Hyperlinks.Add cl, "", "'" & cl.Value & "'!A1"
 Next
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan