Macro entre fichiers format hyperlien

vg00 -  
Bonjour,
J'ai cette partie de code pour venir mettre des informations d'un contact vers un nouveau devis. 

Workbooks(devis).Sheets("offre").Range("MAIL").Value = ThisWorkbook.Sheets("Contacts").Cells(ActiveCell.Row, 17)

le problème c'est que dans mon nouveau devis j'écris un texte mais je n'arrive pas à le mettre en hyperlien par la macro...
A l'aide et merci d'avance



--

3 réponses

  1.  Le Pingou
    Bonjour,
    Pour créer un hyperlien : 

    ActiveSheet.Hyperlinks.Add Anchor:=cellule, Address:=Lien

    cellule = est l'adresse de la cellule que reçoit le lien
    Lien = chemin du répertoire y compris nom du classeur

    0
    1. vg00 Auteur
      Bonjour merci de l'idée...
      en l'occurence le lien est un mail contenu dans la cellule référencée ci dessous dans la macro 
      ThisWorkbook.Sheets("Contacts").Cells(ActiveCell.Row, 17)

      Merci d'avance
      --
      0
      1. Le Pingou
        Bonjour,
        Merci, votre information ne me permet pas dans dire plus.
        Désolé.

        0

        Discussions similaires

        question pix mot caché
        aorum10

        7 réponses