Cum să trimiteți un e-mail cu formatul de text specificat în bold / dimensiune / culoare / subliniat în Excel?

Formatul de corp HTML poate îmbogăți e-mailul și îl poate face ușor de citit. Acest articol discută cum să trimiteți un e-mail cu corp de e-mail în format HTML în Excel, adăugând aldine, subliniere, precum și dimensiunea specificată și formatul de text color.

Trimiteți un e-mail cu formatul specificat cu caractere aldine / mărime / culoare / subliniat cu cod VBA

Trimiteți un e-mail cu formatul specificat cu caractere aldine / mărime / culoare / subliniat cu cod VBA

Vă rugăm să aplicați mai jos codul VBA pentru a trimite un e-mail cu formatul specific al corpului HTML în Excel.

1. apasă pe Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați mai jos codul VBA în fereastra Cod.

Cod VBA: trimiteți un e-mail cu format specific de tip bold / size / color / subliniat în 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

notițe:

3. apasă pe F5 tasta pentru a rula codul. Apoi se deschide e-mailul cu corpul specificat în format HTML. Vă rugăm să faceți clic pe Trimiteți pentru a-l trimite.

Legate de articole:

• Cum să trimiteți automat e-mailul bazat pe valoarea celulei în Excel?
• Cum se introduce semnătura în e-mailul Outlook când se trimite prin vba în Excel?
• Cum să trimiteți e-mail fără Outlook în Excel?
• Cum să trimiteți o anumită diagramă într-un e-mail cu vba în Excel?
• Cum să trimiteți un e-mail la o anumită oră a zilei în Excel?
• Cum să trimiteți e-mailuri cu corp de e-mail HTML în Excel?