Lien Hypertexte " Emplacement dans ce document " VBA

Résolu/Fermé
Boosterz Messages postés 59 Date d'inscription mardi 13 juin 2017 Statut Membre Dernière intervention 28 juin 2017 - 15 juin 2017 à 15:44
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 16 juin 2017 à 10:01
Bonjour,

Je suis à la recherche de comment, en VBA créer un lien Hypertexte qui redirige vers un endroit du document... Car pour le moment avec mon code cela m'ouvre le dossier ce qui n'ai pas le but rechercher .

Merci, voici mon code :

    With Worksheets("2. BDD FRI à valider")
        With .Range("I" & z)
            .Value = "X"
            .Hyperlinks.Add Anchor:=.Item(1), Address:=Chemin, _
             TextToDisplay:="X"
        End With
    End With


Et dans adresse j'ai ceci :
.../DU_projet.1.xlsm - '3.SAISI SITUATION'!A1

Merci

1 réponse

cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 729
16 juin 2017 à 10:01
Bonjour,

 Range("A1").Select 'où placer le lien
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
        "Feuil3!A10", TextToDisplay:="Mon lien" 'création du lien avec adresse de destination



1