Bonjour à la communauté.
J'avais écris ce code il y a très longtemps :
Mais le Sujet n'est plus pris en compte avec Outlook maintenant (je ne sais pas encore avec Thunderbird). Le destinataire, le message, tout fonctionne, sauf le sujet.
Quelqu'un aurait une astuce, un conseil, ou même une solution ?
Bien à toi la communauté
J'avais écris ce code il y a très longtemps :
Le gros avantage de ce code, c'est qu'il ouvrait Thunderbird OU Outlook (ou autres) sans problème.Sub AcContactEnv()
Dim Body, Sujet, StrCommand As String
Const retourChariot = "%0A"
Sujet = "Livraison : "
Body = "Bonjour." & retourChariot
Body = Body & "Veuillez trouver ci-joint la livraison concernant le dossier : " & retourChariot
Body = Body & "Vous souhaitant bonne réception," & retourChariot
Body = Body & retourChariot & "Cordialement,"
Courrier = "mailto:" & "Exemple@gmail.com" & "?&Subject=" & Sujet & "?&Body=" & Body
ActiveWorkbook.FollowHyperlink Courrier
End Sub
Mais le Sujet n'est plus pris en compte avec Outlook maintenant (je ne sais pas encore avec Thunderbird). Le destinataire, le message, tout fonctionne, sauf le sujet.
Quelqu'un aurait une astuce, un conseil, ou même une solution ?
Bien à toi la communauté