Outlook 에서 원본 이메일 메시지와 함께 자동 회신하는 방법은 무엇인가요？

일반적으로 자동으로 이메일에 부재 중하는 규칙을 만들면 본문에 원본 메시지가 포함되지 않습니다. Outlook 에서 원본 메시지를 포함하여 이메일에 자동으로 회신하려면 어떻게 해야 할까요? 이 글에서는 Outlook 에서 가능한 한 빠르게 이 작업을 완료할 수 있도록 도와주는 VBA 코드에 대해 설명하겠습니다。

VBA 코드를 사용하여 Outlook 에서 원본 메시지와 함께 자동 회신 이메일하기

---

VBA 코드를 사용하여 Outlook 에서 원본 메시지와 함께 자동 회신 이메일하기

일반적인 Outlook 규칙으로는 이 작업을 처리할 수 없지만， 다음의 VBA 코드를 사용하면 빠르고 쉽게 완료할 수 있습니다。 다음 단계를 따르세요：

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

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

VBA 코드： 원본 메시지와 함께 자동 회신 이메일하기：

Public WithEvents xlItems As Outlook.Items
Private Sub Application_Startup()
    Set xlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub xlItems_ItemAdd(ByVal objItem As Object)
Dim xlReply As MailItem
Dim xStr As String
If objItem.Class <> olMail Then Exit Sub
Set xlReply = objItem.Reply
With xlReply
     xStr = "<p>" & "Hi, Your email has been received. Thank you!" & "</p>"
     .HTMLBody = xStr & .HTMLBody
     .Send
End With
End Sub 

3. 그런 다음 코드 창을 저장하고 닫기하고 Outlook 을 닫거나 다시 시작하여 VBA 코드를 적용합니다. 이제 이메일을 수신하면 Outlook 이 다음 스크린샷과 같이 원본 메시지가 포함된 자동 회신을(를) 전송합니다：