Outlook 에서 이메일 작성 시 모든 【附件】 이름를 본문에 나열하는 방법은 무엇인가요？

Outlook 에서 이메일을 작성할 때 모든 【附件】 이름를 본문에 삽입할 수 있는 좋은 방법이 있을까요? 이 문서에서는 Outlook 에서 이 작업을 해결하는 방법을 설명합니다。

VBA 코드로 이메일 작성 시 모든 【附件】 이름를 본문에 나열하기

간단한 기능으로 이메일 작성 시 모든 【附件】 이름를 본문에 나열하기

VBA 코드로 이메일 작성 시 모든 【附件】 이름를 본문에 나열하기

다음 단계에 따라 이 작업을 완료하세요：

1.ALT + F11키를 누른 채로Microsoft Visual Basic for Applications창을 엽니다。

2.Microsoft Visual Basic for Applications창에서ThisOutlookSession을(를)Project1(VbaProject.OTM)패널에서 두 번 클릭하여 모듈을 열고， 다음 코드를 빈 모듈에 복사하여 붙여넣습니다。

VBA 코드： 모든 【附件】 이름를 본문에 나열하기：

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim xMailItem As MailItem
    If Item.Class = olMail Then
        Set xMailItem = Item
        If xMailItem.Attachments.Count > 0 Then
          AddAttachmentNamesToBody
        End If
    End If
    End Sub

3。 그런 다음삽입(Insert)>모듈(Module)을(를) 클릭하고 아래 코드를 열린 빈 모듈에 복사하여 붙여넣으세요。 스크린샷 참조：

VBA 코드： 모든 【附件】 이름를 본문에 나열하기：

Public Sub AddAttachmentNamesToBody()
    Dim xMailItem As MailItem
    Dim xAttachment As Attachment
    Dim xFileName As String
   Dim xInspector As Outlook.Inspector
    Dim xDoc As Word.Document
    Dim xWdSelection As Word.Selection
    On Error Resume Next
    Set xMailItem = Outlook.ActiveInspector.CurrentItem
    If xMailItem.Attachments.Count = 0 Then
        Exit Sub
    End If
    xFileName = ""
    For Each xAttachment In xMailItem.Attachments
        If xFileName = "" Then
            xFileName = " <" & xAttachment.FileName & "> "
        Else
            xFileName = xFileName & vbCrLf & " <" & xAttachment.FileName & "> "
        End If
    Next xAttachment
    Set xInspector = Outlook.Application.ActiveInspector()
    Set xDoc = xInspector.WordEditor
    Set xWdSelection = xDoc.Application.Selection
    xWdSelection.HomeKey Unit:=wdStory
    xWdSelection.InsertBefore "Attachments: " & vbCrLf & xFileName & vbCrLf & vbCrLf
    Set xMailItem = Nothing
    End Sub

4。 그런 다음도구(Tools)>참조(References)를Microsoft Visual Basic for Applications창에서 클릭합니다。 표시되는References-Project1대화상자에서Microsoft Word Object Library옵션을사용 가능한 참조(Available References)목록 상자에서 선택하세요。 스크린샷 참조：

5.확인(OK)을 클릭하여 대화상자를 닫은 후， 매크로 버튼을빠른 실행 도구 모음(Quick Access Toolbar)에 추가해야 합니다。 새메시지(Message)창에서기타 명령(More Commands)을(를)빠른 실행 도구 모음 사용자 지정(Customize Quick Access Toolbar)드롭다운에서 선택하세요。 스크린샷 참조：

6.Outlook 옵션(Outlook Options)대화상자에서 다음 작업을 수행하세요：

(1.)매크로(Macros)를명령 선택(Choose commands from)드롭다운 목록에서 선택합니다；

(2.)방금 삽입한 매크로 이름을 클릭합니다；

(3.)그런 다음추가(Add)버튼을 클릭하여 매크로를빠른 실행 도구 모음 사용자 지정(Customize Quick Access Toolbar)에 추가합니다。

7。 그런 다음확인(OK)을 클릭하여 대화상자를 닫으면 이제 매크로 버튼이빠른 실행 도구 모음(Quick Access Toolbar)에 삽입됩니다。 스크린샷 참조：

8。 이제 새 메시지를 작성할 때 매크로 버튼을 클릭하면 【附件】 이름이 다음 스크린샷과 같이 메시지 본문 위에 삽입됩니다：

간단한 기능으로 이메일 작성 시 모든 【附件】 이름를 본문에 나열하기

위의 코드가 적용하기 다소 어렵다고 느껴진다면，Kutools for Outlook가 설치되어 있다면 그 안의이름 복사기능을 사용해 메시지의 【附件】 이름를 빠르게 복사하여 필요한 곳 어디든 붙여넣을 수 있습니다。

Kutools for Outlook 설치 후Kutools for Outlook다음과 같이 진행하세요：

1。 먼저 필요한 새 이메일를 작성한 후， 새Kutools>이름 복사을(를)메시지(Message)창에서 클릭하세요。 스크린샷 참조：

2。 그러면 【附件】 이름이 클립보드에 복사되었음을 알리는 프롬프트 창이 나타납니다。 스크린샷 참조：

3。 이제Ctrl + V키를 함께 눌러 【附件】 이름를 원하는 메시지 본문에 붙여넣기만 하면 됩니다。 스크린샷 참조：

관련 기사 더 보기：

---

최고의 Office 생산성 도구

Kutools for Outlook 의 완전히 새로운 버전을 100+가지 놀라운 기능과 함께 경험해 보세요！지금 다운로드하세요！

🤖KUTOOLS AI:고급 AI 기술을 활용하여 이메일 회신， 요약， 최적화， 확장， 번역， 작성 등 이메일 관련 작업을 손쉽게 처리합니다。

📧이메일 자동화:자동 회신(POP 및 IMAP 지원)/이메일 예약 발송/이메일 발송 시 규칙에 따라 자동 참조/숨은 참조/자동 전달(고급 규칙)/자동 인사말 추가/수신자 여러 명이 포함된 이메일을 자동으로 개별 메시지로 분할...

📨이메일 관리:이메일 회수/제목 등을 기준으로 피싱 이메일 차단/중복된 이메일 삭제/고급 검색/폴더 정리...

📁첨부파일 프로:일괄 저장/일괄 분리/일괄 압축/자동 저장/자동 분리/자동 압축...

🌟인터페이스 마법:😊더 예쁘고 멋진 이모지 제공/중요 이메일 수신 시 알림/Outlook 종료 대신 최소화...

👍한 번의 클릭으로 해결:모두 회신(첨부 파일 포함)/피싱 이메일 방지/🕘발신자의 현재 시간 시간대 표시...

👩🏼‍🤝‍👩🏻연락처 및 캘린더:선택한 이메일에서 연락처 추가 일괄 생성/연락처 그룹를 개별 그룹으로 분할/생일 알림 제거...

Kutools 를 선호하는 언어로 사용하세요 – 영어， 스페인어， 독일어， 프랑스어， 중국어 및 40+개의 다른 언어를 지원합니다！

한 번의 클릭으로 즉시 Kutools for Outlook 의 잠금을 해제하세요。 더 이상 기다리지 마시고 지금 다운로드하여 업무 효율을 높이세요！

Kutools for Outlook 기능 목록      지금 다운로드      구매하러 가기

🚀 한 번의 클릭으로 다운로드 — 모든 Office 애드인 받기

강력히 권장： Kutools for Office (5-in-1)

한 번의 클릭으로다섯 개의 설치 프로그램을동시에 다운로드하세요 —Kutools for Excel, Outlook, Word, PowerPoint및Office Tab Pro.지금 다운로드하세요！

• ✅한 번의 클릭으로 편리하게： 다섯 개의 설치 패키지를 한 번에 다운로드하세요。
• 🚀모든 Office 작업에 대비 완료： 필요한 시점에 필요한 애드인을 설치하세요。
• 🧰포함됨: Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint

스위트 정보⬇ 스위트 다운로드💳 스위트 구매