Corps de message mail automatique

Bonsoir,

J'essaie d'envoyer un mail de manière automatique et j'ai besoin de vos conseils.
J'utilise pour cela la méthode Send de l'objet MailItem.

Tout fonctionne jusque là, mon problème se situe au niveau du corps du message. Sa mise en forme est relativement complexe (tableaux, liste à puces etc...) du coup je ne peux le stocker (contenu + mise en forme) dans une feuille Excel (ou alors si c'est possible je ne sais pas le faire).

Je pensais donc enregistrer quelque part un mail type (le contenu ne bouge pas) au format .msg et réutiliser le corps et le format via les propriétés Body et BodyFormat pour les "copier" dans le (ou les) mails à envoyer.

Suis je sur la bonne piste ou y' a t-il beaucoup plus simple?

Merci d'avance.

Bonjour,

J'ai finalement trouvé une solution qui me convient.

Code:

---

1 2 3 4 5 6 7

Dim oOutlook As New Outlook.Application Dim oMessage As MailItem Set oMessage = oOutlook.CreateItemFromTemplate(ChemTemplate) 'CheminTemplate' est le Path du fichier .msg qui me sert de Modèle (Template) .....   Set oMessage = Nothing Set oOutlook = Nothing

---

Bonne journée.