如何在Excel中以指定的粗體/大小/顏色/下劃線文本格式發送電子郵件？

HTML正文格式可以豐富電子郵件並使其易於閱讀。 本文討論通過在Excel中添加粗體，下劃線以及指定的大小和顏色文本格式來發送HTML格式的電子郵件正文的電子郵件。

使用VBA代碼以指定的粗體/大小/顏色/下劃線文本格式發送電子郵件

使用VBA代碼以指定的粗體/大小/顏色/下劃線文本格式發送電子郵件

請在VBA代碼下方應用，以在Excel中發送具有特定HTML正文格式的電子郵件。

1。 按 其他 + F11 同時打開 Microsoft Visual Basic for Applications 窗口。

2。 在裡面 Microsoft Visual Basic for Applications 窗口中，單擊 插入 > 模塊。 然後將下面的VBA代碼複製到“代碼”窗口中。

VBA代碼：在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

筆記:

3。 按 F5 鍵來運行程式碼。 然後將開啟具有指定 HTML 格式正文的電子郵件。 請點選 送出 按鈕發送。

相關文章：

• 如何根據Excel中的儲存格值自動傳送電子郵件？
• 在Excel中通過vba發送時如何在Outlook電子郵件中插入簽名？
• 如何在沒有Outlook的Excel中發送電子郵件？
• 如何在Excel中使用vba在電子郵件中發送特定圖表？
• 如何在一天中的特定時間在Excel中發送電子郵件？
• 如何在Excel中使用HTML電子郵件正文發送電子郵件？