如何在Outlook中自動將已刪除的郵件標記為已讀？

Author: Kelly Last Modified: 2025-08-06

如果您在 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，並且只會在預設數據文件中將已刪除項目標記為已讀。

從現在開始，當您手動或通過規則自動刪除郵件時，未讀的已刪除郵件將立即在「已刪除郵件」資料夾中標記為已讀。