Transformer un texte (adresse) en lien hypertext

Signaler
Messages postés
61
Date d'inscription
vendredi 9 novembre 2007
Statut
Membre
Dernière intervention
28 octobre 2011
-
cs_lermite222
Messages postés
492
Date d'inscription
jeudi 5 avril 2007
Statut
Membre
Dernière intervention
2 juillet 2012
-
Bonjour à tous,

je souhaiterais connaître un bout de code pour transformer, après l'avoir importer, l'adresse d'un fichier en lien hypertext.

Par exemple, texte ds la cellule :
V:\Hors Contrat\Devis\2010\XXXXXX.doc

Le transformer en lien ==> clic ouvre le fichier

Zeps

1 réponse

Messages postés
492
Date d'inscription
jeudi 5 avril 2007
Statut
Membre
Dernière intervention
2 juillet 2012

Bonjour,

    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
        "V:\Hors Contrat\Devis\2010\XXXXXX.doc", TextToDisplay:="Le nom que tu veux voir dans la cellule"

A+