このメソッドは、Outlookで特定のフォルダーのすべてのサブフォルダーを一括で削除するVBAを導入します。 次のようにしてください。

1。 メールビューで、すべてのサブフォルダーを削除する指定されたフォルダーを選択します。

2。 押す 他の + F11 キーを一緒に押して、Microsoft Visual Basic forApplicationsウィンドウを開きます。

3。 [挿入]> [モジュール]をクリックし、VBAコードの下を新しいモジュールウィンドウに貼り付けます。

Sub Delete_All_SubFolders()
Dim oCurrFolder As Folder
Dim oSubFolders As Folders
Dim i As Long

On Error Resume Next

Set oCurrFolder = Outlook.Application.ActiveExplorer.CurrentFolder
Set oSubFolders = oCurrFolder.Folders

For i = oSubFolders.Count To 1 Step -1
oSubFolders.item(i).Delete
Next
End Sub

4。 押す F5 このVBAを実行するためのキー。 これで、選択したフォルダーの下にあるすべてのサブフォルダーができるだけ早く一括で削除されることがわかります。 スクリーンショットを参照してください：

Outlookで重複するメールをすばやく検索して削除する

Outlook用のKutoolsを使用 重複するメール この機能を使用すると、複数のメールフォルダからそれらをすばやく検索して削除したり、OutlookでXNUMX回クリックするだけで、選択したフォルダからすべての重複を検索して削除したりできます。

Microsoft Outlookから複数のフォルダを一括で削除するには、以下の手順に従ってください。

1。 フォルダを一括削除するメールアカウントを右クリックして、 新規フォルダ コンテキストメニューから、新しいフォルダに次の名前を付けます 温度。 以下のスクリーンショットを参照してください。

2。 次に、削除するフォルダのXNUMXつを新しいフォルダにドラッグします 温度 フォルダー、新しいまでドロップします 温度 フォルダが強調表示されます。 スクリーンショットを参照してください：

3。 これで、Microsoft Outlookダイアログボックスが表示され、選択したフォルダの移動について確認を求められます。 クリックしてください 有り ボタン。 上記のスクリーンショットを参照してください。

4。 削除するすべてのフォルダが新しいフォルダに移動するまで、上記の手順2-3を繰り返します。 温度 フォルダにコピーします。

5。 新しいものを右クリックします 温度 フォルダ、および選択 フォルダーを削除します コンテキストメニューから。 以下のスクリーンショットを参照してください。

6。 警告のMicrosoftOutlookダイアログボックスで、をクリックしてください 有り ボタン。 上記のスクリーンショットを参照してください。

これまでのところ、削除する必要のあるすべてのフォルダが一括で削除されています。

自動/条件付き書式をOutlookの他のフォルダーにコピーする

Outlookのすべてのフォルダー内のアイテム（電子メール）の総数をカウントします