Transformer un texte (adresse) en lien hypertext

cs_zeps2 Messages postés 61 Date d'inscription vendredi 9 novembre 2007 Statut Membre Dernière intervention 28 octobre 2011 - 6 juil. 2010 à 11:17
cs_lermite222 Messages postés 492 Date d'inscription jeudi 5 avril 2007 Statut Membre Dernière intervention 2 juillet 2012 - 6 juil. 2010 à 11:54
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

cs_lermite222 Messages postés 492 Date d'inscription jeudi 5 avril 2007 Statut Membre Dernière intervention 2 juillet 2012 4
6 juil. 2010 à 11:54
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+
0
Rejoignez-nous