Skip to main content

Outlook에서 첨부 파일 이름으로 이메일 제목을 자동으로 채우려면 어떻게 해야 하나요?

Author: Siluvia Last Modified: 2025-08-06

Outlook에서 첨부 파일 이름을 이메일의 제목으로 사용하는 데 익숙한 경우, 매번 수동으로 첨부 파일 이름을 제목에 입력하는 것은 시간이 많이 걸릴 수 있습니다. 아래 GIF와 같이 첨부 파일을 삽입할 때 이메일 제목을 첨부 파일 이름으로 자동 채우고 싶다면, 이 튜토리얼의 VBA 방법이 도움이 될 것입니다.

VBA 코드를 사용하여 이메일 제목을 첨부 파일 이름으로 자동 채우기

다음 VBA 코드를 실행하여 Outlook에서 삽입된 첨부 파일 이름으로 이메일 제목을 자동으로 채우세요.

1. Outlook을 실행하고 Alt + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. Microsoft Visual Basic for Applications 창에서 Project1 (VbProject.OTM) > Microsoft Outlook Objects > ThisOutlookSession을 더블 클릭하여 ThisOutlookSession (Code) 편집기를 엽니다.

3. 그런 다음 다음 VBA 코드를 ThisOutlookSession (Code) 편집기에 복사합니다.

VBA 코드: 첨부 파일 이름으로 이메일 제목 자동 채우기

Public WithEvents GExplorer As Explorer
'Updated by Extendoffice 20220926
Public WithEvents GInspectors As Inspectors
Public WithEvents GMail As MailItem

Private Sub Application_Startup()
  Set GExplorer = Application.ActiveExplorer
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GExplorer_InlineResponse(ByVal Item As Object)
  Set GMail = Item
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Dim xItem As Object
  Set xItem = Inspector.CurrentItem
  If xItem.Class <> olMail Then Exit Sub
  Set GMail = xItem
End Sub

Private Sub GMail_AttachmentAdd(ByVal Att As Attachment)
  Dim xFileName As String
  On Error Resume Next
  If VBA.Trim(GMail.Subject) <> "" Then Exit Sub
  If MsgBox("Do you want to use the attachment name as the subject?", vbYesNo + vbInformation, "Kutools for Outlook") = vbNo Then Exit Sub
  xFileName = Att.DisplayName
  xFileName = Left$(xFileName, VBA.InStrRev(xFileName, ".") - 1)
  GMail.Subject = xFileName
End Sub

doc-autofill-subject-line-with-attachment-name-2

4. 이제 코드를 저장하고 Outlook을 다시 시작해야 합니다.

5. 이제부터 첨부 파일을 아직 제목이 입력되지 않은 이메일에 삽입하면 Kutools for Outlook 대화 상자가 나타나 첨부 파일 이름을 제목으로 사용할지 묻습니다. 예 버튼을 클릭하세요.

doc-autofill-subject-line-with-attachment-name-3

그러면 제목 줄이 삽입된 첨부 파일 이름으로 자동 채워집니다.

doc-autofill-subject-line-with-attachment-name-4

참고:

1) 이미 제목을 입력했다면, 첨부 파일을 삽입해도 대화 상자가 나타나지 않습니다.

2) 현재 이메일에서 기존 제목을 삭제했지만 커서가 여전히 제목 줄에 있는 경우, 첨부 파일을 삽입해도 대화 상자가 나타나지 않습니다. 제목을 삭제한 후에는 코드가 작동하도록 메시지 상자를 새로 고치기 위해 제목 줄 외부를 클릭해야 합니다.

3) 여러 개의 첨부 파일을 동시에 삽입하는 경우, 첫 번째 첨부 파일 이름만 이메일 제목으로 사용할 수 있습니다.

아웃룩의 AI 메일 도우미: 더 스마트한 답장, 더 명확한 커뮤니케이션 (한 번의 클릭으로 끝내기!) ⚡ 무료

Kutools for Outlook의 AI 메일 도우미로 매일 처리하는 아웃룩 작업을 간소화하세요. 이 강력한 도구는 과거 이메일을 학습하여 지능적이고 정확한 답변을 제공하고, 이메일 내용을 최적화하며, 초안 작성 및 메시지 수정을 쉽게 도와줍니다.

doc ai email handle

이 기능은 다음을 지원합니다:

스마트 답장: 과거 대화를 기반으로 맞춤형, 정확한 답변을 받아보세요. 바로 사용할 수 있습니다.
개선된 콘텐츠: 이메일 텍스트를 자동으로 다듬어 명확도와 영향력을 높여보세요.
손쉬운 작문: 키워드만 제공하면 AI가 나머지를 처리해 다양한 작문 스타일로 도와줍니다.
지능적인 확장: 맥락에 맞는 제안으로 생각을 확장하세요.
요약 기능: 긴 이메일의 간결한 요약본을 즉시 받아보세요.
글로벌 도달: 이메일을 손쉽게 다른 언어로 번역하세요.

이 기능은 다음을 지원합니다:

스마트 이메일 답장
최적화된 콘텐츠
키워드 기반 초안 작성
지능적인 콘텐츠 확장
이메일 요약
다국어 번역

가장 좋은 점은 이 기능이 영원히 완전 무료라는 것입니다! 기다리지 말고 지금 AI 메일 도우미를 다운로드하고 즐겨보세요!

최고의 오피스 생산성 도구

속보: Kutools for Outlook 무료 버전 출시!

100개 이상의 놀라운 기능을 갖춘 완전히 새로워진 Kutools for Outlook을 경험해 보세요! 지금 다운로드하세요!

🤖 Kutools AI : 첨단 AI 기술을 활용하여 이메일 회신, 요약, 최적화, 확장, 번역, 작성까지 어떤 작업도 손쉽게 처리합니다.

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

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

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

🌟 인터페이스 매직: 😊더 예쁘고 멋진 이모지 / 중요한 이메일 도착 시 알림 / 종료 대신 Outlook 최소화 ...

👍 원클릭 편의 기능: 모두 회신(첨부 파일 포함) / 피싱 방지 이메일 / 🕘보낸 사람의 시간대 표시 ...

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

원하는 언어로 Kutools를 사용할 수 있습니다 – 영어, 스페인어, 독일어, 프랑스어, 중국어 등40개 이상의 언어 지원!

한 번의 클릭으로 Kutools for Outlook을 즉시 활성화하세요. 기다리지 말고, 지금 다운로드하여 효율성을 높이세요!

kutools for outlook features1

kutools for outlook features2

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