我们可以在发送 Outlook 电子邮件时请求阅读回执。 但是有人甚至希望 Outlook 可以在发送特定电子邮件时自动请求已读回执。 本文将用Outlook VBA实现。
一般来说,如果你想请求已读回执,你有两种方法。 一种是在新消息窗口中手动勾选“请求已读回执”选项,如下图所示:

另一种是在 Outlook 选项的“邮件”选项卡下启用“对于所有已发送的邮件,请求已读回执”,如下图所示:

然而,许多用户希望将 Outlook 配置为仅在发送特定电子邮件时自动请求阅读回执,例如根据邮件主题或邮件收件人等。 下面介绍一种借助Outlook VBA实现的方法。
发送特定电子邮件时自动请求阅读回执
- 首先,启动 Outlook 并切换到“开发人员”选项卡。
- 然后点击“Visual Basic”按钮,会弹出一个新窗口,
- 在“Visual Basic”窗口中,打开“ThisOutlookSession”项目并将以下VBA代码复制到该项目中。
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
If Item.Class = olMail Then
RequestReciept Item
End If
End Sub
Sub RequestReciept(NewMail As MailItem)
Dim Addr As String
Dim Subj As String
'Replace Addr & Subj with your own desired strings
Addr = "example@mail.com"
Subj = "test"
'Specify the email recipients and subject
If InStr(LCase(NewMail.To), Addr) > 0 And InStr(LCase(NewMail.Subject), Subj) Then
NewMail.ReadReceiptRequested = True
End If
End Sub
- 之后,您需要签署此代码并将宏设置更改为仅启用数字签名的宏。
- 最终你可以试试看代码是否能正常运行。
- 单击 Outlook 主窗口中的“新建电子邮件”按钮。
- 然后您可以像往常一样撰写电子邮件,但选择收件人并根据您的代码填写主题。 在我的例子中,收件人应该包括 example@mail.com,主题应该包含“test”。
- 接下来点击“发送”按钮。
- 邮件发出后,可以双击打开。 在其窗口中,转到“开发人员”选项卡并点击“设计此表单”。
- 之后,切换到“(所有字段)”标签并选择“所有邮件字段”。 现在您可以向下滚动直到找到“Receipt Requested”字段。 您可以检查是否需要收据。
警惕未知电子邮件
如今,恶意电子邮件变得越来越猖獗。 因此,所有 Outlook 用户都必须对所有可疑电子邮件保持警惕。 此外,还建议获得一个强大的 Outlook 损坏修复工具. 当您陷入绝望的 Outlook 损坏时,它会来拯救您。
作者简介:
Shirley Zhang 是一位数据恢复专家 DataNumen, Inc.,它是数据恢复技术领域的世界领先者,包括 修复 SQL mdf 文件 和 outlook 修复软件产品。 欲了解更多信息,请访问 datanumen.com



