Outlook에서 동일한 콘텐츠로 여러 이메일을 일괄 회신하는 방법

지금 공유 :

많은 사용자가 Outlook에서 동일한 콘텐츠로 선택한 여러 전자 메일에 일괄 회신 할 수있는 솔루션을 요청합니다. Outlook은 이러한 기능을 제공하지 않지만 VBA 코드를 통해 얻을 수 있습니다.

Outlook에는 한 번에 여러 이메일에 동일한 답장을 보낼 수있는 기능이 없다고 불평하는 사용자가 많습니다. 여러 이메일을 선택하면 "답장"및 "모두 답장"작업이 모두 회색으로 표시되고 비활성화됩니다. 이 문제를 살펴보면이 기능을 실현하는 방법을 공유하겠습니다.

Outlook에서 동일한 콘텐츠로 여러 이메일에 일괄 회신

동일한 콘텐츠로 여러 이메일 일괄 회신

  1. 먼저 Outlook 프로그램을 실행하세요.
  2. 그런 다음 여러 이메일에 답장하는 데 사용할 템플릿 답장을 만들어야합니다.
  • 먼저 새 이메일을 작성하십시오.
  • 그런 다음 답장하려는 내용에 따라이 이메일을 작성하세요.
  • 다음으로 "파일"을 클릭하고 "다른 이름으로 저장"옵션을 선택합니다.
  • 나중에 새로운 "다른 이름으로 저장"대화 상자에서 이름을 입력하고 "파일 형식"상자에서 "Outlook 템플릿"을 선택합니다.
  • 마지막으로“OK”버튼을 누르십시오.템플릿 저장
  1. 다음으로 변경 사항을 저장하지 않고 이메일을 닫을 수 있습니다.
  2. 그런 다음 "Alt + F11"키 버튼을 눌러야합니다.
  3. 그 후 Outlook VBA 편집기 창이 표시됩니다.
  4. 이제 "ThisOutlookSession"프로젝트를 찾아서 열고 다음 VBA 코드를 여기에 복사해야합니다.
Sub Application_ItemContextMenuDisplay(ByVal CommandBar As Office.CommandBar, ByVal Selection As Selection)
    Dim objCommandBarButton As Office.CommandBarButton
 
    If (Selection.count > 1) And (Selection.Item(1).Class = olMail) Then
       Set objCommandBarButton = CommandBar.Controls.Add(msoControlButton)
 
       'Add a "Same Reply" option to the context menu
       With objCommandBarButton
           .Style = msoButtonIconAndCaption
           .Caption = "Same Reply"
           .FaceId = 355
           .OnAction = "Project1.ThisOutlookSession.SendSameReply"
       End With
    End If
End Sub

Sub SendSameReply()
    Dim strTemplate As String
    Dim objTemplateReply As Outlook.MailItem
    Dim strHTMLBody As String
    Dim objSelection As Outlook.Selection
    Dim i As Long
    Dim objReply As Outlook.MailItem
 
    'Input the name of the previously saved template
    strTemplate = InputBox("Enter the name of template message:", , "Template Reply")
    Set objTemplateReply = Application.CreateItemFromTemplate("C:\Users\Test\Documents\UserTemplates\" & strTemplate & ".oft")
    strHTMLBody = objTemplateReply.HTMLBody
 
    Set objSelection = Application.ActiveExplorer.Selection
 
    For i = objSelection.count To 1 Step -1
        Set objReply = objSelection(i).Reply
        With objReply
             .HTMLBody = strHTMLBody & objReply.HTMLBody
             .Send
        End With
    Next
End Sub

VBA 코드-동일한 내용의 여러 이메일 일괄 회신

  1. 마지막으로 현재 창을 닫고이 매크로를 시도 할 수 있습니다.
  • 먼저 메일 목록에서 여러 이메일을 선택합니다.
  • 그런 다음 마우스 오른쪽 버튼으로 클릭하십시오.
  • 다음으로 컨텍스트 메뉴에서 "동일한 응답"옵션을 선택하고 누르십시오.컨텍스트 메뉴에서 "동일 응답"을 선택하십시오.
  • 그런 다음 회신에 사용되는 템플릿을 지정해야합니다.템플릿 지정
  • 이름을 입력하고 "확인"을 누르면 선택한 이메일로 동일한 답장이 발송됩니다.

Outlook이 손상되기 쉽다

Outlook의 일반 사용자로서 다양한 오류가 발생했습니다. 따라서 Outlook 데이터를 보호하기 위해 다양한 조치를 취했습니다. 하지만 아웃룩이 손상되기 쉽고 충돌을 예측하기 어렵 기 때문에 항상 대비해야합니다. 예를 들어, 가능한 한 빨리 데이터를 복구하기 위해 뛰어난 복구 도구를 편리하게 보관했습니다. DataNumen Outlook Repair. 할 수있다 Outlook 수정 소란없이 파일.

저자 소개 :

Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. SQL 손상 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM

지금 공유 :

댓글이 닫혀있다.