Bonjour,

J'ai un petit souci avec un hyperlien que je crée à l'aide de cette commande ci-dessous :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Cells(2, 19).Select
memo = Cells(2, 19).Value
 
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
    "I:\xxxxxxxxxxxxxx\yyy\zzz\www\Traitement\IM2010\IM n°" & memo & ".xls"
 
 
hyperlink = Sheets("delai").Range("S2").Value
Ensuite je voudrais envoyer ce lien hypertexte via Outlook :

' Contenu du mail récupéré dans la feuille "delai"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
.Body = "Bonjour," & vbCrLf & "Veuillez compléter l'incident majeur et le renvoyer." & vbCrLf & hyperlink & vbCrLf & "Cordialement" & vbCrLf & Sheets("delai").Range("p2").Value
J'ai un souci, c'est que je n'arrive pas à mettre ma variable 'hyperlink' en hyperlien dans mon message Outlook.


Quelqu'un peut-il m'aider ?