如何在 Excel 中寄送包含指定粗體、字型大小、顏色或底線等文字格式的郵件?
在許多專業場合中,僅從 Excel 寄送純文字郵件,往往難以凸顯重點或提升可讀性。例如,您可能希望強調關鍵訊息、加入頁首,或運用不同顏色協助收件人快速掌握內容。透過應用 HTML 格式(如粗體、底線、自訂字型大小與彩色文字),您能直接從 Excel 打造視覺吸睛且清晰易讀的郵件。本文將介紹如何從 Excel 寄送自訂 HTML 格式的郵件內文,涵蓋粗體、底線、字型大小與顏色設定等實用技巧。
使用 VBA 程式碼寄送指定粗體/字型大小/顏色/底線文本格式的郵件
使用 VBA 程式碼寄送指定粗體/字型大小/顏色/底線文本格式的郵件
若想直接從 Excel 寄送格式精美的郵件,可運用 VBA 巨集,透過 HTML 標籤定義郵件內容。此方法讓您完全掌握郵件在收件人端的呈現效果,支援粗體、底線、色彩及字型大小等格式設定。
使用 VBA 自訂並從 Excel 寄送郵件特別適用於以下情況:
- 您希望根據資料自動生成並寄送報告、分析或提醒事項,並在內容中醒目標示重點資訊。
- 您需要在自動化郵件中維持專業形象,並展現鮮明的品牌識別度。
- 為提升清晰度,應凸顯多個元素(例如標題、頁首或說明文字)。
然而,使用 VBA 寄送郵件需具備基本的 VBA 編輯器操作能力與 Outlook 整合知識,且您必須擁有透過 Outlook 以程式方式寄送郵件所需的權限。
以下是設定並使用此項 VBA 程式碼的詳細步驟:
1. 同時按下 Alt+F11 鍵,即可開啟 Microsoft Visual Basic for Applications(VBA)編輯器視窗,在此新增自訂程式碼,輕鬆自動化 Excel 作業流程!
2. 在 VBA 編輯器視窗中,點選頂部功能表的插入> 模組,建立新的空白程式碼模組,並將下方提供的 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. 完成必要編輯後,在 VBA 編輯器中按下 F5 鍵以執行程式碼,Outlook 將立即開啟一封帶有指定格式的新郵件。請檢查郵件內容,並點擊傳送按鈕,寄出您的自訂郵件!

注意事項與額外提示:請務必確保 Outlook 已開啟並設為預設郵件用戶端,否則巨集可能無法建立或寄送郵件。若出現與程式化寄信相關的安全性提示,請適時調整 Outlook 設定,或諮詢您的 IT 管理員。同時,請仔細確認收件人電子郵件地址的正確性,避免誤寄。建議先寄送測試郵件給自己,以確保 HTML 格式在不同裝置與郵件用戶端上皆能正確顯示!
此 VBA 方法在 HTML 樣式設定上提供最大的彈性,但需在本機安裝 Outlook,且可能需要調整 Outlook 的巨集安全性設定。若使用者未安裝 Outlook,或偏好更直覺、以點選操作為主的解決方案,可考慮其他工具或增益集。
替代方案:使用 Kutools for Excel 的「寄送郵件」功能
若您經常需要從 Excel 寄送格式化郵件,卻希望避開撰寫或執行 VBA 程式碼的繁瑣流程,Kutools for Excel 的「寄送郵件」工具正是您的理想選擇!這款增益集能根據 Excel 工作表中的資料,輕鬆寄送個人化的 HTML 格式郵件(支援粗體、底線、彩色文字與字型大小調整),全程無需碰觸複雜程式碼,也免受 Outlook 安全性提示干擾。
輕鬆透過 Outlook,根據 Excel 中建立的郵件列表欄位寄送郵件:
寄送郵件功能屬於 Kutools for Excel,可協助您根據 Excel 中建立的郵件列表,透過 Outlook 輕鬆寄送郵件!
立即下載試用!

- 若您經常發送類似郵件,或需要動態包含多欄資料,建議採用此方法。
- 透過使用 Kutools,您能直接在互動式對話方塊中撰寫 HTML 格式郵件、即時預覽效果,並批次寄送格式正確的郵件。
與基於程式碼的方法相比,使用 Kutools 不僅能降低出錯機率、對初學者更友善,還無需啟用或編輯巨集。
若執行 VBA 解決方案時出現錯誤訊息(例如「物件變數或 With 區塊未設定」),請確認 Outlook 已正確安裝與設定、巨集安全性允許執行 VBA 程式碼,且所有必要參考項目均已啟用。您可能還需更新郵箱地址,並調整 HTML 標籤,確保與收件人的郵件用戶端相容(部分舊版用戶端可能不支援所有進階樣式)。若需大量寄送或高頻率使用,務必先以少量樣本測試,避免觸發垃圾郵件過濾機制。
相關文章:
- 如何在 Excel 中根據儲存格的數值自動寄送電子郵件?
- 如何在 Excel 中透過 VBA 寄送 Outlook 郵件時,自動插入簽名檔?
- 如何在 Excel 中不透過 Outlook 寄送郵件?
- 如何透過 VBA 將 Excel 中的特定圖表寄送至電子郵件?
- 如何在 Excel 中於一天的特定時間自動寄送郵件?
- 如何在 Excel 中寄送 HTML 格式的電子郵件內容?
最佳 Office 生產力工具
| 🤖 | KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行 | 產生程式碼| 建立自訂公式 | 分析資料並產生圖表| 呼叫增強函數…… |
| 熱門功能:尋找、醒目提示或標記重複值 | 刪除空白行 | 合併列或儲存格而不遺失資料 | 不使用公式的四捨五入…… | |
| 高級 LOOKUP:多重條件 VLookup | 多重數值 VLookup | 跨多個工作表 VLookup | 模糊查找…… | |
| 高級下拉列表:快速建立下拉式清單 | 相依式下拉式清單 | 多選下拉式清單…… | |
| 欄位管理員:新增指定數量的欄位|移動欄位|切換隱藏欄位的可見狀態|比較範圍與欄位…… | |
| 精選功能:網格聚焦 | 設計視圖 |增強編輯欄 | 工作簿與工作表管理員 | 資源庫(自動文字)| 日期提取 | 合併工作表 | 加密/解密儲存格 | 依清單傳送電子郵件 | 超級篩選 | 特殊篩選(篩選粗體儲存格/斜體/刪除線……) ...... | |
| 頂尖 15 工具組:12 文字工具(添加文本,刪除特定字符,……)| 50+ 圖表 類型(甘特圖,……)| 40+ 實用公式(基於生日計算年齡,……)| 19 插入工具(插入二維碼,從路徑插入圖片,……)| 12 轉換工具(金額轉大寫,匯率轉換,……)| 7 合併和拆分工具(高級合併行,分割儲存格,……)|……以及更多 |
運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……
Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!
- 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
- 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
- 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!
所有 Kutools 增益集,一個安裝程式
Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!
- 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
- 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
- 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
- 30 天完整功能試用— 無需註冊,無需信用卡
- 超值之選— 比單獨購買各增益集更省費用