Перейти к содержимому

Kutools для Office — один пакет. Пять инструментов. Выполняйте больше.

Как сохранить вложения при ответе в Outlook?

Author Kelly Last modified

В Microsoft Outlook, когда вы пересылаете электронное письмо, исходные вложения остаются нетронутыми. Однако, когда вы отвечаете на письмо, Outlook автоматически удаляет все вложения, предполагая, что они не нужны для обсуждения. Это может быть раздражающим и неэффективным, особенно если вам нужно ссылаться на важные файлы, повторно отправлять документы или сохранять вложения для лучшего контекста. К счастью, существует несколько способов гарантировать, что вложения будут включены при ответе в Outlook: будь то ручной метод, одно нажатие или автоматизированное решение.

Ответ с вложениями путем ручного копирования и вставки (Основной и утомительный)

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

Автоматический ответ с вложениями с использованием VBA (Технический и требует настройки)


Ответ с вложениями путем ручного копирования и вставки

Вы можете вручную скопировать вложения из письма и вставить их в ответ перед отправкой.

1. Откройте Outlook, выберите письмо, на которое хотите ответить, и просмотрите его в области чтения или откройте в отдельном окне.

2. Щелкните по любому из вложений, затем нажмите Выбрать все > Копировать под вкладкой Вложения.

the screenshot of step about replying with attachments by manually copying and pasting 1

3. Нажмите кнопку Ответ, чтобы открыть окно ответа.

the screenshot of step about replying with attachments by manually copying and pasting 2

4. В сообщении-ответе щелкните в любом месте тела сообщения и нажмите Ctrl + V или нажмите Вставить на вкладке Сообщение, чтобы вставить скопированные вложения.

the screenshot of step about replying with attachments by manually copying and pasting 3

5. Составьте ваш ответ, проверьте вложения и нажмите Отправить.

Ограничения:

  • Ручной и повторяющийся процесс: Не идеален для частого использования.
  • Затратный по времени: Требует дополнительных шагов каждый раз.
  • Подвержен ошибкам: Вы можете забыть скопировать и вставить вложения.

📂 Легко сохраняйте вложения из нескольких писем

Устали сохранять вложения по одному письму за раз в Outlook? Оптимизируйте свою работу с помощью Kutools для Outlook! Мощная функция Сохранить все (Вложения) позволяет вам сохранять вложения из нескольких писем или целых папок всего за несколько кликов. Забудьте об утомительных ручных процессах и легко контролируйте свой почтовый ящик.

Save attachments in multiple emails

Скачать Kutools для Outlook сейчас


Одно нажатие для ответа с вложениями с использованием Kutools для Outlook 👍

Для быстрого и беспроблемного ответа с вложениями вы можете использовать Kutools для Outlook. Функция «Ответ с оригинальными вложениями» позволяет вам отвечать, сохраняя исходные вложения всего одним кликом.

Попрощайтесь с неэффективностью Outlook! Kutools for Outlook упрощает пакетную обработку электронных писем – теперь с бесплатными функциями, работающими на базе ИИ! Скачайте Kutools for Outlook прямо сейчас!!

Выберите письмо, содержащее вложения, которые необходимо сохранить. Затем нажмите Kutools > Ответ с оригинальными вложениями или Ответ всем с оригинальными вложениями.

the screenshot of the Reply with Original Attachment or Reply All with Original Attachment button

Вот и всё! В ответе автоматически будут включены все вложения из исходного письма. Просто составьте сообщение и нажмите Отправить.

the screenshot of keeping attchments in replying email using Kutools for Outlook

Почему стоит использовать Kutools для Outlook?

  • ✅ Экономит время: Не нужно вручную копировать и вставлять вложения.
  • ✅ Решение в один клик: Мгновенно отвечает с вложениями.
  • ✅ Пользовательский интерфейс: Легко использовать без технических навыков.
Примечание: Чтобы применить функцию «Ответ с оригинальными вложениями» Kutools для Outlook, сначала следует скачать и установить Kutools для Outlook.

Автоматический ответ с вложениями с использованием VBA

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

💡 Важная заметка: Перед запуском макросов VBA необходимо включить макросы в Outlook.

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

1. Выберите электронное письмо, на которое хотите ответить.

2. Нажмите Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

3. В левой панели раскройте Project1 > Объекты Microsoft Outlook. Дважды щелкните ThisOutlookSession, чтобы открыть его.

the screenshot of the ThisOutlookSession option

Шаг 2: Вставьте код VBA

Скопируйте и вставьте следующий код VBA в окно ThisOutlookSession:

Sub RunReplyWithAttachments()
'Update by Extendoffice 20250224
    Dim xReplyItem As Outlook.MailItem
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyItem = xItem.Reply
    CopyAttachments xItem, xReplyItem
    xReplyItem.Display
    Set xReplyItem = Nothing
    Set xItem = Nothing
End Sub

Sub RunReplyAllWithAttachments()
    Dim xReplyAllItem As Outlook.MailItem
    Dim xItem As Object
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyAllItem = xItem.ReplyAll
    CopyAttachments xItem, xReplyAllItem
    xReplyAllItem.Display
    Set xReplyAllItem = Nothing
    Set xItem = Nothing
End Sub

Function GetCurrentItem() As Object
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
        Case "Inspector"
            Set GetCurrentItem = Application.ActiveInspector.CurrentItem
    End Select
End Function

Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
    Dim xFilePath As String
    Dim xAttachment As Attachment
    Dim xFSO As Object
    Dim xTmpFolder As Object
    Dim xFldPath As String
    Set xFSO = CreateObject("Scripting.FileSystemObject")
    Set xTmpFolder = xFSO.GetSpecialFolder(2)
    xFldPath = xTmpFolder.Path & "\"
    For Each xAttachment In SourceItem.Attachments
        If IsEmbeddedAttachment(xAttachment) = False Then
            xFilePath = xFldPath & xAttachment.Filename
            xAttachment.SaveAsFile xFilePath
            TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
            xFSO.DeleteFile xFilePath
        End If
    Next
    Set xFSO = Nothing
    Set xTmpFolder = Nothing
End Sub

Function IsEmbeddedAttachment(Attach As Attachment)
    Dim xAttParent As Object
    Dim xCID As String, xID As String
    Dim xHTML As String
    On Error Resume Next
    Set xAttParent = Attach.Parent
    xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
    If xCID <> "" Then
        xHTML = xAttParent.HTMLBody
        xID = "cid:" & xCID
        If InStr(xHTML, xID) > 0 Then
            IsEmbeddedAttachment = True
        Else
            IsEmbeddedAttachment = False
        End If
    End If
End Function

Шаг 3: Запустите макрос VBA

1. Нажмите F5 или кнопку Запуск, чтобы выполнить макрос.

2. В диалоговом окне Макросы выберите ThisOutlookSession.RunReplyAllWithAttachments для ответа всем или ThisOutlookSession.RunReplyWithAttachments для ответа одному получателю. Нажмите Запустить.

the screenshot of the Macros dialog box

Результат

Окно ответа откроется со всеми исходными вложениями. Просто составьте сообщение и нажмите Отправить.

Плюсы и минусы метода VBA:

  • ✅ Автоматизировано: Не нужно вручную копировать и вставлять вложения.
  • ❌ Требуется знание VBA : Может быть неудобным для новичков.
  • ❌ Макросы отключены по умолчанию : Их нужно включать вручную.

Заключение: Какой метод выбрать?

Вот сравнение трех методов, которое поможет вам решить, какой из них лучше всего подходит для ваших нужд:

МетодЛучше всего подходит дляУдобство использованияЭффективность
Ручное копирование-вставка Разовое использование ⭐⭐⭐⭐ ⭐⭐
Kutools для Outlook Ежедневное использование, неквалифицированные пользователи ⭐⭐⭐⭐⭐ ⭐⭐⭐⭐⭐
Макрос VBA Любители автоматизации, продвинутые пользователи ⭐⭐⭐ ⭐⭐⭐⭐

Для большинства пользователей Kutools для Outlook является лучшим вариантом, поскольку это самый быстрый и простой способ ответить с вложениями в Outlook. Теперь вы легко можете отвечать с вложениями в Outlook, используя метод, который лучше всего соответствует вашему рабочему процессу! 🚀


Демонстрация: Одно нажатие для ответа с вложениями с помощью Kutools для Outlook

 

Связанные статьи:


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

Срочные новости: бесплатная версия Kutools для Outlook уже доступна!

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

🤖 Kutools AI : Использует передовые технологии искусственного интеллекта для легкой работы с Email — включая Ответ, Резюме, Оптимизацию, Расширение, Перевод и Составление писем.

📧 Автоматизация Email: Автоответчик (Доступно для POP и IMAP) / Запланировать отправку писем / Авто Копия/Скрытая копия по правилам при отправке писем / Автоматическое перенаправление (Расширенное правило) / Автоматически добавить приветствие / Авторазделение Email с несколькими получателями на отдельные письма ...

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

📁 Вложения Pro: Пакетное сохранение / Пакетное открепление / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие ...

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

👍 Удобные функции одним кликом: Ответить всем с вложениями / Антифишинговая Email / 🕘Показать часовой пояс отправителя ...

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

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

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

kutools for outlook features1 kutools for outlook features2

🚀 Скачайте все дополнения Office одним кликом

Рекомендуем: Kutools для Office (5-в-1)

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

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