Как удалить пункт «Указать тип вложений» из писем в Outlook?

Управление вложениями в письмах Outlook может быть непростой задачей, особенно когда определённые типы файлов — такие как .docx или .png — захламляют ваш почтовый ящик. Хотя Outlook не предлагает встроенной функции для одновременного удаления конкретных вложений из нескольких писем, существуют эффективные решения. Вы можете воспользоваться сценарием VBA, чтобы вручную удалять вложения по типу файла, или выбрать более быстрый и удобный способ с помощью Kutools для Outlook, который позволяет фильтровать и удалять вложения всего за несколько щелчков. В этом руководстве подробно описаны оба метода.

Удаление Указать тип вложений с помощью VBA(Ручной и технический метод)

Быстрое удаление Указать тип вложений с помощью Kutools для Outlook 👍(Быстро и удобно)

Удаление Указать тип вложений с помощью VBA

Шаг 1: Выберите несколько писем

В представлении Почта выберите письма с вложениями, которые требуется удалить.

Шаг 2: Откройте редактор VBA

Нажмите Alt+F11, чтобы открыть окно Microsoft Visual Basic для приложений.

Шаг 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 для Outlook станет гораздо более эффективным и удобным выбором.

---

📂 Автоматически архивируйте вложения — легко и удобно!

Управлять большим количеством вложений в электронных письмах стало проще простого! Благодаря функции Kutools для Outlook — Автоматическое отсоединение — входящие вложения автоматически сохраняются в указанную папку и заменяются гиперссылками прямо в письмах. Забудьте о ручной обработке и захламлённых почтовых ящиках — начните использовать удобную автоматизацию уже сегодня!

💡 Преимущества, которые вам понравятся:

• ✔️ Автоматически сохраняйте вложения по мере их поступления
• ✔️ Поддерживайте чистоту писем с помощью замены вложений гиперссылками
• ✔️ Полностью настраиваемые параметры под ваш рабочий процесс

Скачать бесплатную версию прямо сейчас!

Быстрое удаление Указать тип вложений с помощью Kutools для Outlook 👍

Для более эффективного и удобного решения Kutools для Outlook предлагает функцию Отсоединить все, которая позволяет удалить вложения определённого типа из нескольких писем всего за несколько щелчков. В отличие от метода VBA, здесь не требуется ни программирование, ни ручной запуск.

Шаг 1: Выберите несколько писем и откройте функцию «Отсоединить все»

В представлении Почта выберите письма с вложениями, которые требуется удалить. Затем нажмите KUTOOLS PLUS > Инструменты вложений > Отсоединить все.

Шаг 2: Настройте параметры отсоединения

1. Нажмите значок Обзор, чтобы выбрать папку назначения для сохранения вложений.
2. Нажмите Дополнительные параметры, чтобы развернуть диалоговое окно.
3. В разделе Условия фильтрации установите флажок Тип вложения. Затем введите в текстовое поле расширения файлов (например,).docx; .png), которые необходимо удалить.
4. Нажмите ОК, чтобы подтвердить.
   

Шаг 3: Подтвердите отсоединение

Появится диалоговое окно подтверждения «Отсоединить все». Нажмите Да, чтобы продолжить.

Результат: Что происходит дальше?

1. Все указанные вложения отсоединены от выбранных писем.

2. Вложения надёжно сохраняются в указанной папке вместо безвозвратного удаления. При необходимости их можно восстановить, нажав KUTOOLS PLUS > Инструменты вложений > Восстановить все.

3. Каждая гиперссылка в исходном письме ведёт к отсоединённому файлу, обеспечивая быстрый доступ и поддерживая порядок в вашем почтовом ящике.

---

Лучшие инструменты для повышения продуктивности в Office

Оцените совершенно новый Kutools для Outlook с 100+ потрясающими функциями!Нажмите, чтобы скачать прямо сейчас!

🤖KUTOOLS AI:Использует передовые технологии ИИ для удобной работы с электронной почтой: ответы, составление резюме, оптимизация, расширение, перевод и создание писем.

📧Автоматизация работы с электронной почтой: Автоответ (доступен для POP и IMAP) / Планирование отправки писем / Авто Копия/Скрытая копия по правилам при отправке писем / Автоматическое перенаправление (расширенное правило) / Автоматическое добавление приветствия / Автоматическое разделение писем с несколькими получателями на отдельные сообщения…

📨Управление электронной почтой: Отозвать письмо / Блокировка спама по теме и другим признакам / Удаление дубликатов писем / Расширенный поиск / Организация папок…

📁Продвинутая работа с вложениями: Пакетное сохранение / Пакетное отсоединение / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие…

🌟Волшебство интерфейса: 😊Еще больше красивых и стильных эмодзи / Напоминание о важных входящих письмах / Сворачивание Outlook вместо закрытия…

👍Чудеса одним щелчком: Ответить всем с вложениями / Защита от фишинговых писем / 🕘Отображение часового пояса: текущее время отправителя…

👩🏼‍🤝‍👩🏻Контакты и календарь: Пакетное добавление контактов из выбранных писем / Разделение группы контактов на отдельные группы / Удаление напоминания о дне рождения…

Используйте Kutools на вашем любимом языке — поддержка английского, испанского, немецкого, французского, китайского и более чем 40 других языков!

Мгновенно получите доступ к Kutools для Outlook одним щелчком! Не теряйте время — скачайте прямо сейчас и повысьте свою эффективность!

Список функций Kutools для Outlook      Скачать сейчас      Перейти к покупке

🚀 Скачать одним щелчком — Получите все надстройки для Office

Настоятельно рекомендуется: Kutools for Office (5 в 1)

Скачайте одним щелчком пять установщиковсразу —Kutools для Excel, Outlook, Word, PowerPointи Office Tab Pro.Нажмите, чтобы скачать прямо сейчас!

• ✅Удобство одним щелчком: Скачайте все пять установочных пакетов за одно действие.
• 🚀Готовы к любой задаче в Office: устанавливайте нужные надстройки именно тогда, когда они вам понадобятся.
• 🧰Входит в комплект: Kutools для Excel / Kutools для Outlook / Kutools для Word / Office Tab Pro / Kutools for PowerPoint

О пакете⬇ Скачать пакет💳 Приобрести пакет