如何在 Outlook 中自动以 HTML 格式回复？

作者Kelly修改日期2024-11-21

在 Microsoft Outlook 中，我们可以设置所有新邮件默认以 HTML 格式编写，但回复邮件时，系统会自动采用收到邮件的原始格式，无法直接自动以 HTML 格式回复。本文将为您分享一个在 Outlook 中自动以 HTML 格式回复邮件的小技巧。

手动以 HTML 格式格式回复并设置格式

使用 Kutools for Outlook 自动始终以 HTML 格式格式回复

通过 VBA 自动以 HTML 格式格式回复

手动以 HTML 格式格式回复并设置格式

在 Outlook 中回复邮件时，将纯文本或富文本格式转换为 HTML 格式非常便捷。

1：请选择您要回复的邮件。

2：在主页选项卡（或 Outlook 2007 的工具栏）上，单击回复按钮即可回复选中的邮件。

3：在格式文本选项卡（或在 Outlook 2007 中的）选项选项卡）上，单击 HTML。

这样，回复邮件的格式将立即切换为 HTML 格式。

4：编辑您的回复邮件后，点击发送按钮。

使用 Kutools for Outlook 自动始终以 HTML 格式格式回复

在这里，为您推荐一款实用工具——Kutools for Outlook 的始终使用固定格式答复工具。使用此工具，您可以轻松指定回复格式（如 HTML、纯文本、RTF），并将其设置为所有后续邮件回复的固定格式。

告别 Outlook 低效！Kutools for Outlook 助您高效批量处理邮件——现已推出 30 天免费试用！立即下载 Kutools for Outlook！！

1. 请点击 KUTOOLS PLUS > 工具箱 > 始终使用固定格式答复 > 设置答复的格式。

2. 在设置答复的格式对话框中，选择 HTML 选项，然后点击确定按钮。

3. 现在请在 KUTOOLS PLUS 选项卡下，点击固定格式> 始终使用固定格式答复> 启用，即可启用该工具。

从现在起，Outlook 回复邮件时将始终采用 HTML 格式。

如需免费试用此工具，请先前往免费下载下载软件，然后按照上述步骤操作。

通过 VBA 自动以 HTML 格式格式回复

以下方法可帮助您在 Microsoft Outlook 中自动将所有邮件回复为 HTML 格式。

1：请选择您希望以 HTML 格式进行回复的邮件。

2：按下 Alt+F11 组合键，即可打开 Microsoft Visual Basic for Applications 窗口。

3：点击插入 > 模块。

4：将以下代码粘贴到新的模块窗口中。

Sub AlwaysReplyInHTML()
Dim oSelection As Outlook.Selection
Dim oItem As Object
'Get the selected item
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set oSelection = Application.ActiveExplorer.Selection
If oSelection.Count > 0 Then
Set oItem = oSelection.Item(1)
Else
MsgBox "Please select an item first!", vbCritical, "Reply in HTML"
Exit Sub
End If
Case "Inspector"
Set oItem = Application.ActiveInspector.CurrentItem
Case Else
MsgBox "Unsupported Window type." & vbNewLine & "Please select or open an item first.", _
vbCritical, "Reply in HTML"
Exit Sub
End Select
    Dim oMsg As Outlook.MailItem
Dim oMsgReply As Outlook.MailItem
Dim bPlainText As Boolean
'Change the message format and reply
If oItem.Class = olMail Then
Set oMsg = oItem
If oMsg.BodyFormat = olFormatPlain Then
bPlainText = True
End If
oMsg.BodyFormat = olFormatHTML
Set oMsgReply = oMsg.Reply
If bIsPlainText = True Then
oMsg.BodyFormat = olFormatPlain
End If
oMsg.Close (olSave)
oMsgReply.Display
'Selected item isn't a mail item
Else
MsgBox "No message item selected. Please select a message first.", _
vbCritical, "Reply in HTML"
Exit Sub
End If
'Cleanup
Set oMsgReply = Nothing
Set oMsg = Nothing
Set oItem = Nothing
Set oSelection = Nothing
End Sub

5：如果您只需以 HTML 格式回复选中的邮件，请按下 F5 键运行代码。在弹出的回复窗口中编辑邮件，并点击发送按钮即可发送。

提示：：

如果您希望以后在 Outlook 中始终或经常以 HTML 格式格式回复邮件，请继续按下列步骤进行设置。

1）单击自定义快速访问工具栏按钮（在 Outlook 功能区中），然后点击更多命令，在下拉菜单中选择。

2）在 Outlook 选项对话框中，您需要：

2.1）选择宏，位于从下列位置选择命令下拉列表；
2.2）选择 Project 1.AlwaysReplyInHTML（在命令框中）；
2.3）点击添加按钮（可见已选择的宏添加到右侧）；
2.4）点击确定按钮。见下图：

3）现在该宏已添加到快速访问工具栏，并显示为一个

图标。每次您需要以 HTML 格式格式回复邮件时，只需请选择选中邮件并点击该按钮激活功能。

最佳办公效率工具

体验全新 Kutools for Outlook，畅享 100+ 强大功能！立即点击下载，不容错过！

🤖KUTOOLS AI：采用先进 AI 技术，轻松处理邮件，涵盖回复、摘要、优化、扩展、翻译及撰写等功能。

📧 邮件自动化：自动答复（支持 POP 和 IMAP）/定时发送邮件/发送邮件时按规则自动抄送密送/自动转发（高级规则）/自动添加称呼/自动将多收件人邮件拆分为单独信息……

📨 邮件管理：撤回邮件/按主题等条件拦截诈骗邮件/删除重复邮件/高级搜索/整合文件夹……

📁 附件增强：批量保存/批量分离/批量压缩/自动保存/自动拆离/自动压缩……

👍 一键精彩功能：带附件全部答复/反钓鱼邮件/🕘显示发送者当前时间时区……

👩🏼‍🤝‍👩🏻 联系人与日历：批量从选定邮件中提取添加联系人/将联系人组拆分为个人组/移除生日提醒……

在您的首选语言中畅享 Kutools —— 支持英语、西班牙语、德语、法语、中文等 40 多种语言！

一键解锁 Kutools for Outlook，告别等待，立即下载，让效率倍增！

Kutools for Outlook 功能列表立即下载前往购买

🚀 一键下载 — 即可获取全部 Office 加载项

强烈推荐：Kutools for Office（5 合 1）

一键下载五个安装包，即可同时获得 Kutools for Excel、Outlook、Word、PowerPoint 和 Office Tab Pro。立即点击下载！

✅ 一键便捷：只需一次操作，即可下载全部五个安装包。
🚀 轻松应对各类 Office 任务：随时按需安装所需插件，助您高效办公，不容错过！
🧰 包含：Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint

关于套件 ⬇ 下载套件 💳 购买套件