如何在Outlook中自动将已删除的邮件标记为已读？

Author: Kelly Last Modified: 2025-07-31

如果您在 Microsoft Outlook 中删除了一封未读的电子邮件，该邮件会被移动到“已删除邮件”文件夹并保持未读状态。在某些情况下，Outlook 用户可能希望出于规则执行或其他原因，自动将已删除的邮件标记为已读。在这里，我将介绍在 Microsoft Outlook 中将已删除邮件标记为已读的方法。

手动将所有已删除项目标记为已读

一键自动将已删除项目标记为已读

使用VBA自动将已删除邮件标记为已读

手动将所有已删除项目标记为已读

在 Microsoft Outlook 中，用户可以轻松地将整个邮件文件夹标记为已读，包括“已删除邮件”文件夹。

删除您的电子邮件后，在导航窗格中选择“已删除邮件”文件夹，右键单击它，并从右键菜单中选择“全部标记为已读”。请参见下面的截图：

doc-mark-deleted-as-read-1

一键自动将已删除项目标记为已读

如果您想将子文件夹中的已删除项目标记为已读，或者希望在删除时自动将项目标记为已读，该如何实现呢？这里，“Kutools for Outlook”的“将删除标记为已读”工具可以帮助您完成。

使用Kutools for Outlook解锁无与伦比的邮件处理效率！永久免费获取 70 项强大功能。立即下载免费版本！

1. 点击“Kutools Plus” > “更多” > “标记为已读” > “启用标记为已读”。

会弹出一个对话框询问您是否要包含子文件夹。点击“是”以标记主文件夹和子文件夹中的已删除项目，或点击“否”以排除子文件夹。

然后，会弹出一个确认对话框，通知您所有已删除的项目都已被标记为已读。

此外，任何被删除并移动到“已删除邮件”文件夹的未读邮件都会自动标记为已读。

使用VBA自动将已删除邮件标记为已读

本节将介绍一个VBA宏，该宏会在删除时自动将所有已删除的邮件标记为已读。

步骤1：同时按下“Alt” + “F11”打开Microsoft Visual Basic for Applications窗口。

步骤2：在左侧窗格中展开“Project1”，然后双击“ThisOutlookSession”以打开一个空白窗口。

doc-mark-deleted-as-read-2

步骤3：将以下VBA代码粘贴到空白窗口中。

VBA：自动将已删除邮件标记为已读

Dim WithEvents g_OlkFolder As Outlook.Items
Private Sub Application_Quit()
Set g_OlkFolder = Nothing
End Sub
Private Sub Application_Startup()
Set g_OlkFolder = Session.GetDefaultFolder(olFolderDeletedItems).Items
End Sub
Private Sub g_OlkFolder_ItemAdd(ByVal Item As Object)
Item.UnRead = False
Item.Save
End Sub

步骤4：保存VBA宏并重新启动您的Microsoft Outlook。

注意：此VBA宏仅适用于Microsoft Outlook 2013，并且只会将默认数据文件中的已删除项目标记为已读。

从现在开始，当您手动或通过规则自动删除电子邮件时，未读的已删除邮件将立即在“已删除邮件”文件夹中标记为已读。