bambi
XLDnaute Occasionnel
Bonsoir à tous !
J'ai une macro excel qui me permet en un clic d'envoyer des mails à une liste de destinataires.
Dans l'email préformaté, je fais référence à un lien vers un fichier
Comment l'écrire dans la macro pour qu'il le soit ?
J'espère que ma question est claire sinon, je préciserai
Merci d'avance
La macro en question:
J'ai une macro excel qui me permet en un clic d'envoyer des mails à une liste de destinataires.
Dans l'email préformaté, je fais référence à un lien vers un fichier
A l'arrivée des mails, ce lien dans le message est en texte et n'est pas cliquable.L:\Revue presse\Presse_78.xls
Comment l'écrire dans la macro pour qu'il le soit ?
J'espère que ma question est claire sinon, je préciserai
Merci d'avance
La macro en question:
Code:
Sub MailingListe()
Dim Dest As String
Dim Sujt As String
Dim Msg As String
For Each Lescellules In Range("D3:D5")
Dest = Lescellules.Value
Sujt = "Revue de Presse"
Msg = "Bonjour, un nouvel article concernant votre activité" _
& vbNewLine & "est disponible dans la revue de presse." _
& vbNewLine & "Vous trouverez la revue de presse à cette adresse: L:\Revue presse\Presse_78.xls"
Shell "D:\Program Files\Outlook Express\msimn.exe " & _
"/mailurl:mailto:" & Dest & "?subject=" & Sujt & "&Body=" & Msg & ""
SendKeys "%s"
Next
End Sub