3種快速刪除Outlook中過期約會的方法

立即分享:

也許您的Outlook中有許多過期的約會。 在本文中,我們將向您介紹3種快速刪除所有過期約會的方法。

為了使您的PST數據較小,並使日曆更整潔和井井有條,您需要刪除Outlook中的那些無用的項目,例如過期的約會,即今天之前安排的約會。 Outlook沒有提供直接功能來識別此類約會並一次性刪除它們。 因此,在這裡,我們將向您介紹3種技巧,以快速查找和刪除過期的約會。

1:手動刪除過期的約會

  1. 首先,啟動Outlook,轉到“日曆”窗格,然後打開一個特定的日曆文件夾。
  2. 然後切換到“查看”選項卡,然後單擊“查看設置”。
  3. 在彈出的對話框中,單擊“過濾器”按鈕。設置視圖過濾器
  4. 接下來,您應該指定高級視圖過濾器。
  • 首先,在“欄位”方塊中輸入“開始”,選擇“在…之前或之後”,然後在“值”中輸入“昨天”。
  • 接下來添加另一個-“在昨天或之前結束”。添加視圖過濾器
  1. 隨後,單擊一系列“確定”,直到返回日曆。
  2. 此後,您將看到列表中只剩下過期的約會。
  3. 最後選擇全部,然後按“刪除”按鈕。

2:通過存檔刪除過期的約會

  1. 首先,轉到“文件”菜單。
  2. 然後單擊“清理工具”按鈕,並從下拉列表中選擇“存檔”。存檔功能
  3. 最終在新彈出的對話框中,執行以下步驟:
  • 首先,選擇“日曆”。
  • 然後在“存檔時間早於:”中鍵入“今天”
  • 接下來,您可以選擇通過“瀏覽”按鈕指定“存檔PST文件”。
  • 最後點選「確定」按鈕開始歸檔。通過存檔刪除逾期約會

3:通過Outlook VBA刪除過期的約會

  1. 首先,按“ Alt + F11”鍵按鈕訪問Outlook VBA編輯器。
  2. 然後,在隨後的窗口中,您應該打開一個新模塊。
  3. 稍後,您可以將以下VBA代碼複製並粘貼到模塊中。
Sub DeleteAllOverDueAppointments()
    Dim objAppointments As Outlook.Items
    Dim objVariant As Variant
 
    Set objAppointments = Outlook.Application.Session.GetDefaultFolder(olFolderCalendar).Items
 
    For i = objAppointments.Count To 1 Step -1
        Set objVariant = objAppointments.Item(i)
        'Specify the overdue appointments
        If (objVariant.Start < Date) And (objVariant.End < Date) Then
           objVariant.Delete
        End If
    Next
End Sub

VBA 代碼 - 刪除所有過期約會

  1. 之後,您可以點擊工具列中的「執行」圖示來啟動巨集。
  2. 一次,所有過期的約會都將從您的日曆中刪除。

保護您的 Outlook 數據

您必須非常重視Outlook數據,因為Outlook中有大量重要的電子郵件或聯繫人。 因此,您應該定期備份Outlook數據。 而且,以便快速取回您的 腐敗的Outlook Outlook崩潰後的數據,您應該在附近放置一個出色的工具,例如 DataNumen Outlook Repair.

作者簡介:

Shirley Zhang是的數據恢復專家 DataNumen,Inc.是數據恢復技術的全球領導者,包括 sql損壞 和Outlook修復軟件產品。 欲了解更多信息,請訪問 萬維網。datanumen.COM

立即分享:

評論被關閉。