Outlook 에서 여러 이메일의 모든 첨부 파일을 새 이메일에 복사하려면 어떻게 해야 하나요？

Outlook 에서 이메일 첨부 파일을 효율적으로 관리하는 것은 특히 여러 이메일에서 첨부 파일을 추출하여 새 이메일에 통합하거나 이메일의 모든 첨부 파일을 답장에 복사해야 할 때 어려울 수 있습니다。 파일을 수동으로 저장하고 다시 첨부하는 작업은 시간이 많이 소요될 뿐만 아니라 오류도 발생하기 쉽습니다。 다행히도 이 작업을 간소화할 수 있는 두 가지 효과적인 방법이 있습니다。 기술적 지식이 필요하지만VBA를 사용하여 여러 이메일에서 첨부 파일을 추출하고 첨부 파일 삽입하여 새 이메일에 저장할 수 있습니다。 그러나 더 빠르고 번거롭지 않은 해결책으로Kutools for Outlook도구는 이메일의 모든 첨부 파일을 답장 이메일에 즉시 복사할 수 있는 원클릭 옵션을 제공하므로 가장 효율적이고 사용자 친화적인 선택입니다。

VBA 를 사용하여 여러 이메일의 모든 첨부 파일을 새 이메일로 복사하기(수동적이고 기술적)

놀라운 도구로 이메일의 모든 첨부 파일을 답장 이메일에 즉시 복사하기 👍(간편하고 권장됨)

---

VBA 를 사용하여 여러 이메일의 모든 첨부 파일을 새 이메일로 복사하기

VBA 를 사용하여 프로세스를 자동화하는 것을 선호하는 경우 다음 단계에 따라 여러 이메일에서 모든 첨부 파일을 신속하게 추출하여 새 이메일에 복사할 수 있습니다。

단계 1: 여러 이메일 선택

Outlook 에서 복사하려는 첨부 파일이 포함된 이메일을 선택합니다。

• Ctrl 키를 누른 상태로 인접하지 않은 여러 이메일을 선택하세요。
• Shift 키를 누른 상태로 연속된 이메일 범위를 선택하세요。

단계 2: VBA 편집기 열기

Alt + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다。

단계 3: 새 모듈에 VBA 코드 삽입

클릭하여 삽입 > 모듈을 선택해 새 모듈을 생성합니다。 그런 다음 다음 VBA 코드를 모듈 창에 붙여넣으세요：

VBA： 여러 이메일의 모든 첨부 파일을 새 이메일로 복사하기

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

단계 4: VBA 코드 실행

F5 키를 누르거나 실행 버튼을 클릭하여 코드를 실행합니다。 선택한 이메일에서 추출된 모든 첨부 파일이 포함된 새 이메일이 열립니다。

---

놀라운 도구로 이메일의 모든 첨부 파일을 답장 이메일에 즉시 복사하기 👍

더 간단하고 빠른 해결책으로 Kutools for Outlook 의 원본 첨부 파일로 답장 기능을 사용할 수 있습니다. 이 방법을 사용하면 VBA 나 수동 첨부 파일 복사 없이 한 번의 클릭으로 이메일의 모든 첨부 파일을 답장 이메일에 직접 복사할 수 있습니다。

1. 메일 보기에서 답장을 보내려는 이메일을 선택합니다。 그런 다음 Kutools > 원본 첨부 파일로 답장 또는 원본 첨부 파일로 전체 답장을 클릭하세요。

2. 이제 선택한 이메일의 모든 첨부 파일이 자동으로 답장 이메일에 복사됩니다。

---

관련 문서

Outlook 에서 첨부 파일을 다른 이메일로 복사하는 방법은 무엇인가요？