如何批次取消旗標，或將已標記的郵件標示為完成（Outlook）？

在 Outlook 中為郵件加上旗標，是突顯重要郵件、提醒自己後續處理的便捷方式。然而隨著時間推移，這些已加旗標的郵件可能不斷累積——無論是因為任務已完成，還是誤將不再需要優先處理的郵件標記為旗標。若您希望快速有效地清除這些旗標（無論是標示為完成或完全取消），Outlook 提供了多種靈活方法。本指南將逐步說明適用於不同情境的實用解決方案，涵蓋從內建功能操作到透過 VBA 程式碼自動化處理的完整做法。

---

在 Outlook 中透過快捷選單批次取消多封郵件的旗標

清除多封郵件旗標最簡單的方法之一，就是在郵件列表中直接使用快捷選單。當您需要快速移除目前資料夾中少量郵件的旗標時，這個方法非常理想。請注意，此方式需手動選取郵件，最適合已標記郵件數量不多的情況。

1. 按住 Ctrl 鍵，並逐一點選各個已標記的郵件，即可同時選取多個項目。逐一封選郵件有助於避免誤刪仍需追蹤的郵件旗標。

2. 在任一選取的紅色旗標上按一下滑鼠右鍵，並於快捷選單中選擇清除旗標，即可立即移除所有選中項目的旗標！

提示與注意事項：若發現清除旗標選項無法使用，請確認您已選取已標記的郵件，且 Outlook 檢視畫面未套用會限制快捷選單操作的篩選或群組設定。此方法於標準郵件資料夾中直接操作時效果最佳。

---

---

在 Outlook 中透過「快速步驟」批次取消多封郵件的旗標

Outlook 的快速步驟功能可將多項操作合併為單一捷徑，非常適合處理重複性任務（例如取消郵件旗標）。若您經常需要清除旗標，又想節省時間（相較於手動右鍵點選），強烈推薦使用此方法！設定專屬的「快速步驟」來取消旗標，不僅能加速工作流程，還能讓您透過一次點擊或按鍵，輕鬆處理整批郵件。

1. 在郵件檢視畫面中，於首頁索引標籤的快速步驟群組中，點選建立新項目。

2. 點選選擇動作，即可顯示可用指令清單；向下捲動並選取清除郵件上的旗標。

3. 動作名稱會自動填入名稱方塊中。建議將其重新命名為易於記憶的名稱，並可選擇設定快速鍵（例如 ）CTRL+SHIFT+9）與工具提示文字，日後即可輕鬆存取此動作！最後，點選完成。

4. 接下來，選取您要清除旗標的已標記郵件（按住 ）Ctrl 並逐一點選各封郵件），然後點擊您建立的「快速步驟」或使用指定的快速鍵，即可一次清除所有選中郵件的旗標！

---

在 Outlook 的「任務」檢視畫面中批次取消旗標或將已標記的郵件標示為完成

切換至任務檢視畫面，即可將已加旗標的郵件當作可執行項目或任務集中管理！當您經常使用旗標，並希望一次性將多項工作標示為完成或移除旗標（無需逐一在收件匣中操作）時，這個方法尤其實用。

1. 將 Outlook 檢視畫面切換至任務—點擊下方導覽窗格中的任務按鈕，或使用鍵盤快速鍵 Ctrl+4.

2. 按住 Ctrl 鍵，即可一次選取多個任務或已加旗標的郵件。

3. 在首頁索引標籤的管理任務群組中，可使用標示為完成（完成任務但不刪除）或從清單中移除（完全清除旗標），一次輕鬆更新多個已加旗標項目的狀態！

---

透過 VBA 程式碼批次取消旗標或將已標記的郵件標示為完成（巨集自動化）

自動化清除或標示已加旗標的郵件為「完成」，可大幅提升工作效率，尤其在處理大型信箱或重複性工作流程時效果更顯著。透過 Outlook 的 VBA 巨集，您能批次處理所有已加旗標的郵件，省去逐一手動選取的耗時步驟。當您經常需要管理大量已標記郵件，或希望實現自動化處理（例如在共用信箱中作業，或執行定期信箱維護）時，此解決方案將格外實用。

優點：支援批次操作自動化，大幅減少手動作業；可針對整個信箱進行處理；更能自訂鎖定特定資料夾，靈活又高效！
限制：需啟用巨集並具備基本的 Visual Basic 編輯器操作知識；不適用於嚴格限制巨集執行的安全環境；執行批次作業前，務必備份重要信箱資料，並盡可能先於非生產環境的資料夾中測試，確保萬無一失！

1. 在 Outlook 中，前往包含您要處理之已標記郵件的資料夾，並選取欲取消旗標或標示為完成的郵件（按住 ）Ctrl 可多選郵件）。

2. 按下 Alt+F11 快速鍵，開啟 Microsoft Visual Basic for Applications（VBA）視窗。

3. 在 VBA 編輯器中，點選插入 > 模組，接著將下列其中一段 VBA 程式碼複製並貼上至模組中，依您是要清除旗標或將其標示為完成而定。

VBA 程式碼：在當前文件夾中取消所有選取之已標記的郵件的旗標

Sub UnflagSelectedMessages()
    Dim xSelection As Selection
    Dim xMail As MailItem
    Dim i As Integer
    
    On Error Resume Next
    Set xSelection = Outlook.Application.ActiveExplorer.Selection
    
    For i = 1 To xSelection.Count
        If xSelection.Item(i).Class = olMail Then
            Set xMail = xSelection.Item(i)
            
            If xMail.FlagStatus <> olNoFlag Then
                xMail.ClearTaskFlag
                xMail.Save
            End If
        End If
    Next
    
    MsgBox "All selected messages have been unflagged.", vbInformation, "KutoolsforOutlook"
    
    Set xMail = Nothing
    Set xSelection = Nothing
End Sub

VBA 程式碼：將所有選取之已標記的郵件標示為完成

Sub CompleteSelectedFlags()
    Dim xSelection As Selection
    Dim xMail As MailItem
    Dim i As Integer
    On Error Resume Next
    xTitleId = "KutoolsforOutlook"
    Set xSelection = Application.ActiveExplorer.Selection
    For i = 1 To xSelection.Count
        If xSelection.Item(i).Class = olMail Then
            Set xMail = xSelection.Item(i)
            If xMail.FlagStatus = olFlagMarked Then
                xMail.FlagStatus = olFlagComplete
                xMail.Save
            End If
        End If
    Next
    MsgBox "Selected flags have been marked complete.", vbInformation, xTitleId
    Set xMail = Nothing
    Set xSelection = Nothing
End Sub

4. 貼上程式碼後，關閉 VBA 編輯器視窗。
5. 接著執行巨集：按下 Alt＋F8 開啟巨集對話方塊，選擇 UnflagSelectedMessages 或 CompleteSelectedFlags，再點選執行即可完成操作！

注意事項與疑難排解：請確認已在 Outlook 設定中啟用巨集，此解決方案方能正常運作。執行巨集前，務必僅選取預期的郵件，因為變更將立即生效且無法復原！

---

相關文章