Problème de police dans un mail généré à partir d'Excel
Pitbul0169@
Messages postés32Date d'inscriptiondimanche 8 mai 2016StatutMembreDernière intervention24 juin 2023
-
24 juin 2023 à 10:22
Bonjour à tous,
Je cherche depuis quelques temps une solution à mon problème de taille de police dans le corps d'un mail avec signature généré à partir d'un fichier Excel. Je m'explique...
Je génère un mail à partir d'Excel avec le code ci-dessous :
Sub CreerMail()
'Déclarationdes variables
Dim oOutlook As Object
Dim oMail As Object
'On affecte les variables de type objet - initialisation des variables objets - SET
Set oOutlook = CreateObject("Outlook.Application")
Set oMail = oOutlook.CreateItem(0)
'On construit le message
With oMail
.Display 'On affiche le message, nécessaire pour récupérer la signature
.to = "***@***" 'L'adresse du destinataire
.Subject = "Sujet du mail" 'On affiche l'objet du mail
'On affiche le corps du mail -> NOT OK
.HTMLBody = "Bonjour,<br>" & _
"Je suis le corps du message.<br>" & _
.HTMLBody
.Display 'On affiche le message
End With
End Sub
Ma police par défaut sous Outlook est Calibri taille 11.
Le mail est bien généré, mais mon texte apparait en Calibri taille 10.
Si je supprime l'insertion de ma signature ou que j'insère un texte simple, c'est à dire sans balise HTML, la police de mon message est bien Calibri taille 11.
Quelqu'un aurait-il une solution pour que mon message apparaisse en Calibri taille 11 même avec l'insertion de ma signature ?
Pitbul0169@ Windows / Chrome 114.0.0.0 / Outlook + Excel 365 version 2304 Build 16.0.16327.20324
A voir également:
Problème de police dans un mail généré à partir d'Excel