如何從Outlook的郵件中刪除特定類型的附件？

在Outlook中管理郵件附件可能會有挑戰，特別是當某些文件類型（例如 .docx 或 .png）讓您的收件匣變得混亂時。雖然Outlook沒有內建功能可以一次從多封郵件中刪除特定附件，但還是有一些高效的解決方案。您可以使用VBA腳本手動根據文件類型刪除附件，或者選擇更快、更易用的解決方案——Kutools for Outlook，它讓您只需點擊幾下就能過濾並刪除附件。本指南將帶您了解這兩種方法。

使用VBA刪除特定類型的附件（手動且技術性）

使用Kutools for Outlook快速刪除特定類型的附件 👍 （快速且易用）

使用VBA刪除特定類型的附件

步驟 1：選擇多封郵件

在郵件檢視中，選擇包含要刪除附件的郵件。

步驟 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框並點擊確定。

步驟 5：運行VBA腳本

1. 按下F5或點擊運行按鈕來執行代碼。

2. 將出現一個提示框，輸入要刪除的附件類型（例如，xlsx）。點擊確定。

結果

VBA腳本將從所選郵件中刪除所有符合指定類型的附件。

如果您經常需要從郵件中刪除附件，Kutools for Outlook的方法是一個更高效且易用的解決方案。

---

📂 輕鬆自動歸檔附件！

管理大量郵件附件變得毫不費力！使用 Kutools for Outlook 的自動拆離功能，所有傳入的附件會自動保存到指定文件夾，並在郵件中以超連結形式替代。告別手動操作和擁擠的收件匣，立即擁抱無縫自動化吧！

💡 您會喜愛的優勢：

• ✔️ 附件到達時自動保存
• ✔️ 使用超連結替換，保持郵件整潔
• ✔️ 完全可自定義的選項，適應您的工作流程

立即下載免費版本！

使用Kutools for Outlook快速刪除特定類型的附件 👍

為了更高效且易用的解決方案，Kutools for Outlook提供了「拆解附件」功能，讓您只需點擊幾下即可從多封郵件中刪除特定文件類型。與VBA方法不同，不需要編碼或手動執行。

步驟 1：選擇多封郵件並訪問「拆解附件」功能

在郵件檢視中，選擇包含要刪除附件的郵件。然後點擊Kutools Plus > 附件工具 > 拆解附件。

步驟 2：設置拆解偏好

1. 點擊 選擇 圖標以指定保存附件的目標文件夾。
2. 點擊高級選項以展開對話框。
3. 在過濾條件部分，勾選附件類型框。然後在文本框中輸入要刪除的文件擴展名（例如，.docx；.png）。
4. 點擊確定確認。
   

步驟 3：確認拆解

將出現「拆解附件」確認對話框。點擊是繼續。

結果：接下來會發生什麼？

1. 所有指定的附件都已從所選郵件中拆離。

2. 附件安全地存儲在指定的文件夾中，而不是永久刪除。如有需要，您可以通過點擊Kutools Plus > 附件工具 > 恢復所有來恢復它們。

3. 原始郵件中的每個超鏈接代表一個拆離的文件，提供快速訪問，同時保持您的收件匣整潔有序。

---

最佳 Office 生產力工具

最新消息：Kutools for Outlook 推出免費版本！

體驗全新 Kutools for Outlook，擁有100+ 強大功能！立即下載！

🤖 Kutools AI ：運用先進 AI 技術，輕鬆處理郵件，包括答覆、摘要、優化、擴寫、翻譯與撰寫郵件。

📧 郵件自動化：自動回覆（支援 POP 和 IMAP） / 計劃發送郵件 / 發送郵件時根據規則自動抄送密送 / 自動轉發（高級規則） / 自動新增問候語 / 自動將多收件人郵件分割為個別郵件 ...

📨 郵件管理：撤回郵件 /依主題等條件阻擋詐騙郵件 / 刪除重複郵件 / 高級搜索 / 整合文件夾 ...

📁 附件專業版：批次保存 / 批次拆離 / 批次壓縮 / 自動保存 / 自動拆離 / 自動壓縮 ...

🌟 介面魔法：😊更多精美酷炫表情符號 /重要郵件來臨提醒 / 最小化 Outlook 而非關閉 ...

👍 一鍵神技：帶附件全部答復 /反釣魚郵件 / 🕘顯示發件人時區 ...

👩🏼‍🤝‍👩🏻 聯絡人與日曆：批次從選中郵件新增聯絡人 / 將聯絡人組分割為多個組 / 移除生日提醒 ...

以您偏好的語言使用 Kutools —— 支援英語、西班牙語、德語、法語、中文及40 多種其他語言！

只需一鍵即可立即啟用 Kutools for Outlook。立即下載，提升您的效率！

Kutools for Outlook 功能列表立即下載 前往購買