如何在 Outlook 中批量回复具有相同內容的多封電子郵件

Outlook解決方案 2025 年 9 月 29 日
立即分享：

許多用戶要求一種解決方案，允許他們在 Outlook 中批量回復多個選定的具有相同內容的電子郵件。 雖然 Outlook 沒有提供這樣的功能，但您仍然可以通過一段 VBA 代碼來實現它。

我聽到很多用戶抱怨 Outlook 沒有支持他們一次性向多封電子郵件發送相同回复的功能。 當他們選擇多封電子郵件時，“回复”和“全部回复”操作都會變灰 - 被禁用。 針對這個問題，下面分享一個實現這個特性的方法。

在 Outlook 中批量回复具有相同內容的多封電子郵件

批量回復多封內容相同的郵件

  1. 首先，star您的Outlook程序。
  2. 然後，您需要創建一個模板回复，用於回復多封電子郵件。
  • 首先，創建一個新電子郵件。
  • 然後，根據您要回复的內容撰寫此電子郵件。
  • 接下來，單擊“文件”並選擇“另存為”選項。
  • 稍後，在新的“另存為”對話框中，輸入名稱並在“保存類型”框中選擇“Outlook 模板”。
  • 最後，點擊“確定”按鈕。保存模板
  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損壞 和Outlook修復軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM

立即分享：

評論被關閉。