Outlookで特定の種類の添付ファイルをメールから削除するにはどうすればよいですか？

Author: Xiaoyang Last Modified: 2025-05-23

Outlookでのメールの添付ファイル管理は、特に.docxや.pngなどの特定のファイル形式が受信トレイを散らかす場合、難しい場合があります。Outlookには複数のメールから特定の添付ファイルを一度に削除する機能が組み込まれていませんが、効率的な解決策があります。VBAスクリプトを使用して、ファイルタイプに基づいて手動で添付ファイルを削除することもできますし、より速く使いやすいKutools for Outlookを使用して、数回のクリックでフィルタリングと添付ファイルの削除を行うことも可能です。このガイドでは、両方の方法について説明します。

VBAを使用して特定の種類の添付ファイルを削除する（手動および技術的）

Kutools for Outlookを使用して特定の種類の添付ファイルを迅速に削除 👍 （高速でユーザーフレンドリー）

VBAを使用して特定の種類の添付ファイルを削除する

ステップ 1: 複数のメールを選択する

メールビューで、添付ファイルを削除したいメールを選択します。

ヒント：隣接していないメールを選択する場合はCtrlキーを押しながら個々のメールをクリックします。または、Shiftキーを押しながら最初と最後のメールをクリックして範囲を選択します。

ステップ 2: VBAエディターを開く

Alt + F11を押してMicrosoft Visual Basic for Applicationsウィンドウを開きます。

ステップ 3: VBAコードを追加する

VBAウィンドウで、挿入 > モジュールをクリックして新しいモジュールを作成します。その後、次のVBAスクリプトをコピーして新しいモジュールに貼り付けます。

VBA: メールから特定の種類の添付ファイルを削除する

Sub DeleteSpecificTypeOfAttachments()
Dim xSelection As Outlook.Selection
Dim xItem As Object
Dim xMailItem As Outlook.MailItem
Dim xAttachment As Outlook.Attachment
Dim xFileType As String
Dim xType As String
Dim xFSO As Scripting.FileSystemObject
Dim I As Integer
On Error Resume Next
Set xSelection = Outlook.Application.ActiveExplorer.Selection
Set xFSO = New Scripting.FileSystemObject
xType = ""
xType = InputBox("Enter the attachment type to remove (e.g., docx, png):", "Kutools for Outlook", xType, 8)
If Len(Trim(xType)) = 0 Then Exit Sub
For Each xItem In xSelection
    If xItem.Class = olMail Then
        Set xMailItem = xItem
        If xMailItem.Attachments.Count > 0 Then
            For I = xMailItem.Attachments.Count To 1 Step -1
                Set xAttachment = xMailItem.Attachments.Item(I)
                xFileType = xFSO.GetExtensionName(xAttachment.FileName)
                If InStr(1, xFileType, Trim(xType), vbTextCompare) > 0 Then
                    xAttachment.Delete
                End If
            Next I
            xMailItem.Save
        End If
    End If
Next
Set xMailItem = Nothing
Set xFSO = Nothing
End Sub

ステップ 4: Microsoft Scripting Runtimeを有効にする

1. VBAエディターで、 ツール > 参照設定をクリックします。

2. 「参照設定 - Project1」ダイアログボックスで、「Microsoft Scripting Runtime」のチェックボックスをオンにして「OK」をクリックします。

doc remove attach by type 1

ステップ 5: VBAスクリプトを実行する

1. F5キーを押すか、実行ボタンをクリックしてコードを実行します。

2. プロンプトボックスが表示されますので、削除したい添付ファイルの種類（例: xlsx）を入力し、「OK」をクリックします。

doc remove attach by type 2

結果

VBAスクリプトは、選択したメールから指定された種類のすべての添付ファイルを削除します。

doc remove attach by type 3

この方法の制限事項：

❌ VBAの知識が必要：初心者向けではなく、非技術ユーザーには難しい可能性があります。
❌ プレビューも元に戻しもなし：添付ファイルが削除されると復元できません。
❌ 手動での実行が必要：添付ファイルを削除するたびにスクリプトを実行する必要があります。
❌ 誤って削除するリスク：間違ったファイルタイプを入力すると、意図しない添付ファイルが削除される可能性があります。

頻繁にメールから添付ファイルを削除する必要がある場合、Kutools for Outlookの方法ははるかに効率的でユーザーフレンドリーなソリューションです。

📂 添付ファイルを簡単に自動アーカイブ！

大量のメール添付ファイルの管理がこれまでになく簡単になりました！Kutools for Outlookの自動切り離し機能を使用すると、受信した添付ファイルは指定されたフォルダーに自動的に保存され、メール内のハイパーリンクに置き換えられます。手動での操作や散らかった受信トレイにサヨナラし、今日からシームレスな自動化を実現しましょう！

Auto Detach Feature in Kutools for Outlook

💡 あなたが気に入るメリット：

✔️ 添付ファイルが到着したら自動的に保存
✔️ ハイパーリンクによる置き換えでメールを整理
✔️ ワークフローに合わせて完全にカスタマイズ可能なオプション

無料版を今すぐダウンロード！

Kutools for Outlookを使用して特定の種類の添付ファイルを迅速に削除 👍

より効率的でユーザーフレンドリーな解決策として、Kutools for OutlookはDetach All機能を提供しており、これにより複数のメールから特定のファイルタイプを数回のクリックで削除できます。VBA方式とは異なり、コーディングや手動での実行は不要です。

Kutools for Outlookで究極のメール効率を解き放とう！強力な70の機能を永久に無料で利用できます。今すぐ無料版をダウンロード！

ステップ 1: 複数のメールを選択し、Detach All機能にアクセスする

メールビューで、添付ファイルを削除したいメールを選択します。次に、Kutools Plus > 添付ファイルツール > Detach Allをクリックします。

shot of the Detach All button

📌 ヒント：Ctrlキーを押しながら複数の隣接していないメールを選択するか、Shiftキーを押して隣接しているメールの範囲を選択します。

ステップ 2: 分離設定を行う

クリックしてください参照アイコンをクリックして、添付ファイルを保存するためのターゲットフォルダを指定します。
詳細オプションをクリックしてダイアログを展開します。
フィルター条件セクションで、添付ファイルの種類が次のものと一致するのチェックボックスをオンにします。そして、削除したいファイル拡張子（例:.docx;.png）をテキストボックスに入力します。
クリック OK 確認します。