How to copy all attachments from multiple emails to a new email in Outlook？

Author: Kelly Last Modified: 2025-04-08

Managing email attachments efficiently in Outlook can be challenging, especially when you need to extract attachments from multiple emails and consolidate them into a new email or copy all attachments from an email into a reply. Manually saving and reattaching files is not only time-consuming but also prone to errors. Fortunately, there are two effective ways to simplify this task. You can use VBA to extract and insert attachments from multiple emails into a new email, though it requires some technical knowledge. However, for a faster and hassle-free solution, the Kutools for Outlook tool provides a one-click option to instantly copy all attachments from an email into a reply email, making it the most efficient and user-friendly choice.

Copy all attachments from multiple emails to a new email using VBA (Manual and Technical)

Copy all attachments from an email to a reply email instantly with an amazing tool 👍 (Effortless and Recommended)

Copy all attachments from multiple emails to a new email using VBA

If you prefer using VBA to automate the process, you can follow these steps to quickly extract and copy all attachments from multiple emails into a new email.

Step 1: Select multiple emails

In Outlook, select the emails containing attachments that you want to copy.

Hold "Ctrl" to select multiple non-adjacent emails.
Hold "Shift" to select a range of adjacent emails.

Step 2: Open the VBA editor

Press "Alt" + "F11" to open the "Microsoft Visual Basic for Applications" window.

Step 3: Insert the VBA code into a new module

Click "Insert" > "Module" to create a new module. And paste the following VBA code into the module window:

VBA: Copy all attachments from multiple emails to a new email

Sub NewEmailInsertAttachmentsName()
Dim xSelection As Outlook.Selection
Dim xMailItem As Outlook.MailItem
Dim xAttachment As Outlook.Attachment
Dim xFSO As Object
Dim xFldPath As String

Dim xFilePath As String
Dim xNewMail As Outlook.MailItem
On Error Resume Next
Set xSelection = Outlook.Application.ActiveExplorer.Selection
Set xNewMail = Outlook.Application.CreateItem(olMailItem)
Set xFSO = CreateObject("Scripting.FileSystemObject")
xFldPath = xFSO.GetSpecialFolder(2).Path & "\MyAttachments"
If xFSO.FolderExists(xFldPath) = False Then
xFSO.CreateFolder (xFldPath)
End If

For Each xMailItem In xSelection
For Each xAttachment In xMailItem.Attachments
xFilePath = xFldPath & "\" & xAttachment.FileName
xAttachment.SaveAsFile (xFilePath)
xNewMail.Attachments.Add (xFilePath)
xFSO.DeleteFile (xFilePath)
Next
Next
xFSO.GetFolder(xFldPath).Delete
xNewMail.Display
End Sub

Step 4: Run the VBA code

Press "F5" or click the Run button to execute the code. A new email will open, containing all attachments extracted from the selected emails.

Drawbacks:

❌ Requires VBA knowledge: Not beginner-friendly and involves working with code.
❌ Manual setup required: You need to open the VBA editor, insert the code, and run it each time.
❌ Potential security restrictions: Some Outlook versions block macros due to security policies.
❌ No flexibility: You must rerun the script whenever you need to copy attachments again.

📂 Effortlessly Save Attachments from Multiple Emails

Tired of saving attachments one email at a time in Outlook? Streamline your workflow with Kutools for Outlook! The powerful Save All (Attachments) feature lets you save attachments from multiple emails or entire folders in just a few clicks. Say goodbye to tedious manual processes and take control of your inbox effortlessly.

Download Kutools for Outlook Now

Copy all attachments from an email to a reply email instantly with an amazing tool 👍

For a simpler and faster solution, you can use the Reply with Original Attachment feature in "Kutools for Outlook". This method allows you to copy all attachments from an email directly into a replying email with just one click—no need for VBA or manual attachment copying.

Unlock ultimate email efficiency with Kutools for Outlook! Access 70 powerful features absolutely free, forever. Download the Free Version Now!

1. In the Mail view, select the email you want to reply to. Then click "Kutools" > "Reply with Original Attachment or Reply All with Original Attachment".

the screenshot of copying attchment to a replying email using Kutools 1

2. Now, all attachments from the selected email are automatically copied into the reply email.

the screenshot of copying attchment to a replying email using Kutools 2

Advantages of the Kutools for Outlook method:

✅ No manual copying or pasting: Works instantly with one click.
✅ No need for VBA coding: User-friendly and hassle-free.
✅ Time-saving: Drastically reduces effort compared to manual methods.
✅ Compatible with all Outlook versions: No macro restrictions or security warnings.

Note: To apply the Reply with Original Attachment utility of Kutools for Outlook, firstly, you should download and install Kutools for Outlook.

How to copy attachment to another email in Outlook?