すべてのOutlook電子メールアカウントのすべての「削除済みアイテム」フォルダをバッチで空にする方法

Outlookソリューション 2025 年 9 月 29 日
今すぐ共有：

Outlookで複数の電子メールアカウントを構成し、各アカウントが個別のOutlookデータファイルを使用している場合、いくつかの「削除済みアイテム」フォルダーがあります。 すべての電子メールアカウントの各「削除済みアイテム」フォルダーを空にする場合は、この記事のVBAコードを利用できます。 それはあなたがそれらをまとめて空にすることを可能にします。

ご存知のとおり、Outlookでは、ユーザーが複数の電子メールアカウントを追加および構成できます。 さらに、各アカウントが個別のOutlookデータファイルを使用している場合、すべてのファイルには、削除されたアイテムを格納する「削除済みアイテム」フォルダーが付属します。 すべての「削除済みアイテム」フォルダ内のアイテムが役に立たないことを確認すると、フォルダを空にする傾向があります。 この場合、手動で空にすると、非常に面倒になる可能性があります。 次のように、ヒントを適用してバッチで空にすることをお勧めします。

すべてのOutlook電子メールアカウントのすべての「削除済みアイテム」フォルダをバッチで空にします

すべての電子メールアカウントのすべての「削除済みアイテム」フォルダをバッチで空にします

  1. 最初に、Outlookプログラムを起動します。
  2. 次に、Outlookのメインウィンドウで「Alt + F11」キーボタンを押します。
  3. 次に、「Microsoft Visual Basic for Applications」ウィンドウで、空のモジュールを開く必要があります。
  4. 続いて、次のVBAコードをコピーしてこのモジュールに貼り付けます。
Sub BatchEmptyAllDeletedItemsFolder()
    Dim objStores As Outlook.Stores
    Dim objStore As Outlook.Store
    Dim objPSTFile As Outlook.Folder
    Dim objFolders As Outlook.folders
    Dim objFolder As Object
 
    Set objStores = Outlook.Application.Session.Stores
 
    'Process all Outlook PST files in your Outlook
    For Each objStore In objStores
        Set objPSTFile = objStore.GetRootFolder
        For Each objFolder In objPSTFile.folders
            Call ProcessFolders(objFolder)
        Next
    Next
End Sub

Sub ProcessFolders(ByVal objCurrentFolder As Outlook.Folder)
    Dim i, n As Long
 
    If objCurrentFolder.Name = "Deleted Items" Then
       'Delete all the items in "Deleted Items" folder
       For i = objCurrentFolder.Items.Count To 1 Step -1
           objCurrentFolder.Items.Item(i).Delete
 
           'Delete all the subfolders under "Deleted Items" folder
           For n = objCurrentFolder.folders.Count To 1 Step -1
               objCurrentFolder.folders.Item(n).Delete
           Next
       Next
    End If
End Sub

VBAコード-すべてのOutlook電子メールアカウントのすべての「削除済みアイテム」フォルダをバッチで空にします

  1. その後、Outlookのマクロ設定をチェックして、Outlookでマクロが許可されていることを確認する必要があります。
  2. 最終的には、モジュールに戻り、「F5」キーボタンを押してこのマクロを実行できます。
  3. マクロの実行後、すべての「削除済みアイテム」フォルダーが正常に空になったことを確認できます。

Outlookが破損した場合

OutlookのクラッシュやOutlookの破損に遭遇したことはありますか？ 一般的に、あなたはひどい事件にどのように対処しますか？ Outlookを何十年も使用している場合、Outlookのさまざまな問題に対処することは避けられません。 したがって、受信トレイの修復ツールの使用、Outlookデータの定期的なバックアップ、堅牢性の確保など、いくつかの修復と回復の方法を念頭に置いておく必要があります。 Outlookの修正 ツールなど。これらすべての予防策を講じれば、PSTファイルが危険にさらされた場合でも、落ち着いてOutlookデータを簡単に見つけることができます。

著者紹介：

Shirley Zhangは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。 SQLを修正 と見通し修理ソフトウェア製品。 詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com

今すぐ共有：

コメントは締め切りました。