Envoyer un courriel à partir d'Excel

Question

J'ouvre un email outlook à partir d'excel en utilisant vba. J'aimerais formater le corps du texte, par exemple en utilisant une certaine police et en mettant quelques mots en gras. Est-ce possible ?

Voici mon vba pour l'ouverture d'un email :

Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
    .To = strRecipient
    .CC = ""
    .BCC = ""
    .subject = strSubject
    .body = strBody
    .Display
End With

Answer 1

Vous devez utiliser la fonction Format de courrier HTML pour cela :

OutMail.BodyFormat = olFormatHTML
OutMail.HTMLBody = "<b>Bold</b>, not bold"