Mettre en gras une partie d'un mail généré via vba excel
Bonjour à tous,
Je souhaiterais envoyer automatiquement un mail via Outlook et qui serait généré par vba Excel. L'objet de ma demande est de savoir comment je peux mettre en gras certains mots qui sont dans l'objet du mail.
Sur un exemple simple:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39
| Sub Send_MsgHNY()
Set objOL = CreateObject("Outlook.Application")
Set objMail = objOL.CreateItem(olMailItem)
file_export = ActiveWorkbook.Path + "\" + ActiveWorkbook.Name
With objMail
.to = Cells(8, 6)
.CC = Cells(9, 6)
.Subject = Cells(7, 6) & " Happy New Year "
.Body = "Bonne" & _
Chr(13) & "Année" & _
Chr(13) & "2013"
.Attachments.Add file_export
.Display
End With
ActiveWorkbook.Close
Set objMail = Nothing
Set objOL = Nothing |
J'aimerais mettre en gras uniquement le mot "Année".
Merci d'avance pour votre aide et bonne année 2013