Macro entre fichiers format hyperlien

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. Bonjour,
    Merci, votre information ne me permet pas dans dire plus.
    Désolé.

    0
    1. 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. 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

        Discussions similaires

        question pix mot caché

        7 réponses