Envoi de mail HTML avec Excel - CSS

Bonjour,

Je suis entrain de faire une macro qui automatise un envoi de mail avec comme base un mail sous forme HTML.

J'ai un soucis dans la réalisation, le code HTML ne suffit pas, il faut ajouter le CSS.

Après avoir cherché, j'ai vu que l'on pouvait intégrer le CSS dans le code HTML (entre des balises <style> dans la balise <head>).

Malgré cette technique, le mail arrive sans avoir pris en compte le code CSS.

Mon HTML de base est un doc HTML chrome, peut être l'écriture varie-t-elle sur outlook?

Merci de vos retour

Bonjour,

J'ai testé ça :

Sub SendMail()

Dim Fichier As String
Dim MonOutlook As Object
Dim MonMessage As Object

  Set MonOutlook = CreateObject("Outlook.Application")
  Set MonMessage = MonOutlook.CreateItem(0)
  MonMessage.BodyFormat = 2
       corps = "<style>p {  color: #3bafda; }</style>"
         MonMessage.To = "toto@google.com"
  MonMessage.CC = ""
  MonMessage.Subject = "Demande d'intervention"
  corps = corps & "Bonjour," & vbCrLf

  corps = corps & "<p>"
  corps = corps & "<p> Ci-joint la demande d'intervention"
  MonMessage.HTMLBody = corps
  MonMessage.Display

  Set MonOutlook = Nothing

End Sub

Bonjour oxydum,

Merci de ta réponse, j'ai essayé ton code.

Le format fonctionne avant l'envoi (mail rédigé en couleur) mais lorsque je l'envoi, le mail reçu n'est pas mis en forme...

Ok,

Essaie de placer le style sur la balise :

  corps = corps & "<p style='color: #3bafda;'> <b>Ci-joint la demande d'intervention</b>"
Rechercher des sujets similaires à "envoi mail html css"