Wie sendet man eine E-Mail mit einem bestimmten Fett/Schriftgröße/Farbe/Unterstrichen-Textformat in Excel?

Das HTML-Body-Format kann die E-Mail bereichern und sie leicht lesbar machen. Dieser Artikel erörtert, wie man eine E-Mail mit einem HTML-formatierten E-Mail-Body in Excel versendet, indem man Fettdruck, Unterstreichungen sowie eine bestimmte Schriftgröße und Textfarbe hinzufügt.

E-Mail mit spezifischem Fett/Schriftgröße/Farbe/Unterstrichen-Textformat mit VBA-Code senden

E-Mail mit spezifischem Fett/Schriftgröße/Farbe/Unterstrichen-Textformat mit VBA-Code senden

Bitte wenden Sie den folgenden VBA-Code an, um eine E-Mail mit einem speziellen HTML-Body-Format in Excel zu versenden.

1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie im Fenster Microsoft Visual Basic for Applications auf Einfügen > Modul. Kopieren Sie dann den folgenden VBA-Code in das Codefenster.

VBA-Code: E-Mail mit speziellem Fett/Schriftgröße/Farbe/Unterstrichen-Textformat in Excel senden

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

Hinweise:

3. Drücken Sie die F5-Taste, um den Code auszuführen. Dann wird die E-Mail mit dem spezifischen HTML-Format geöffnet. Bitte klicken Sie auf die Schaltfläche Senden, um sie zu versenden.

Verwandte Artikel:

• Wie sendet man automatisch eine E-Mail basierend auf einem Zellenwert in Excel?
• Wie fügt man eine Signatur in eine Outlook-E-Mail ein, wenn man sie per VBA in Excel versendet?
• Wie sendet man eine E-Mail ohne Outlook in Excel?
• Wie sendet man ein bestimmtes Diagramm per E-Mail mit VBA in Excel?
• Wie sendet man eine E-Mail zu einer bestimmten Tageszeit in Excel?
• Wie sendet man eine E-Mail mit einem HTML-E-Mail-Body in Excel?