Comment envoyer un e-mail avec un format de texte en gras/taille/couleur/souligné spécifié dans Excel ?

Le format du corps en HTML peut enrichir l'e-mail et le rendre facile à lire. Cet article explique comment envoyer un e-mail avec un corps au format HTML dans Excel en ajoutant du texte en gras, souligné ainsi que la taille et la couleur spécifiées.

Envoyer un e-mail avec un format de texte en gras/taille/couleur/souligné spécifié avec un code VBA

Envoyer un e-mail avec un format de texte en gras/taille/couleur/souligné spécifié avec un code VBA

Veuillez appliquer le code VBA ci-dessous pour envoyer un e-mail avec un format spécifique de corps HTML dans Excel.

1. Appuyez simultanément sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.

2. Dans la fenêtre Microsoft Visual Basic for Applications, cliquez sur Insérer > Module. Ensuite, copiez le code VBA ci-dessous dans la fenêtre Code.

Code VBA : Envoyer un e-mail avec un format de texte en gras/taille/couleur/souligné spécifié dans Excel

Sub SharePerformance1()
'Update by ExtendOffice 2018/3//5
    Dim xOutApp As Object
    Dim xOutMail As Object
    Dim xOutMsg As String
    On Error Resume Next
    Set xOutApp = CreateObject("Outlook.Application")
    Set xOutMail = xOutApp.CreateItem(0)
    xOutMsg = "<b>This text is bold</b><br/><span style=""color:#80BFFF"">Font Color</span style=""color:#80BFFF""><br />" & _
               "<u>New line with underline</u><br /><p style='font-family:calibri;font-size:25'>Font size</p>"
    With xOutMail
        .To = "Email Address"
        .CC = ""
        .BCC = ""
        .Subject = "Html format email"
        .HTMLBody = xOutMsg
        .Display
    End With
    Set xOutMail = Nothing
    Set xOutApp = Nothing
End Sub

Remarques :

3. Appuyez sur la touche F5 pour exécuter le code. L'e-mail avec le corps au format HTML spécifié s'ouvre. Cliquez sur le bouton Envoyer pour l'envoyer.

Articles connexes :

• Comment envoyer automatiquement un e-mail basé sur la valeur d'une cellule dans Excel ?
• Comment insérer une signature dans un e-mail Outlook lors de l'envoi par vba dans Excel ?
• Comment envoyer un e-mail sans Outlook dans Excel ?
• Comment envoyer un graphique spécifique dans un e-mail avec vba dans Excel ?
• Comment envoyer un e-mail à un moment précis de la journée dans Excel ?
• Comment envoyer un e-mail avec un corps au format HTML dans Excel ?