Bonjour,
J'ai un petit souci avec un hyperlien que je crée à l'aide de cette commande ci-dessous :
Ensuite je voudrais envoyer ce lien hypertexte via Outlook :
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
' Contenu du mail récupéré dans la feuille "delai"
J'ai un souci, c'est que je n'arrive pas à mettre ma variable 'hyperlink' en hyperlien dans mon message Outlook.
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
Quelqu'un peut-il m'aider ?
Partager