Paano Mag-batch Tumugon ng Maramihang Mga Email na may Parehong Nilalaman sa Iyong Outlook

Maraming mga gumagamit ang humihiling ng isang solusyon na nagbibigay-daan sa kanilang i-batch na sagutin ang maraming mga napiling email na may parehong nilalaman sa Outlook. Bagaman hindi nagbibigay ang Outlook ng gayong tampok, maaari mo pa rin itong makamit sa pamamagitan ng isang piraso ng VBA code.

Narinig ko ang isang mahusay na bilang ng mga gumagamit na nagreklamo na ang Outlook ay walang isang function na sumusuporta sa kanila upang magpadala ng parehong tugon sa maraming mga email nang sabay-sabay. Kapag pumili sila ng maraming mga email, ang parehong mga pagkilos na "Tumugon" at "Sumagot Lahat" ay magiging greyed - hindi paganahin. Sa pagtingin sa isyung ito, pagkatapos nito, magbabahagi kami ng isang pamamaraan upang mapagtanto ang tampok na ito.

Batch Sumagot Maramihang mga Email na may Parehong Nilalaman

1. Una sa lahat, simulan ang iyong programa sa Outlook.
2. Pagkatapos, kailangan mong lumikha ng isang template na tugon na nais mong gamitin para sa pagtugon sa maraming mga email.

• Una, lumikha ng isang bagong email.
• Pagkatapos, isulat ang email na ito batay sa kung ano ang nais mong tumugon.
• Susunod, i-click ang "File" at piliin ang opsyong "I-save Bilang".
• Sa paglaon, sa bagong dialog box na "I-save Bilang", maglagay ng isang pangalan at piliin ang "Template ng Outlook" sa kahon na "I-save bilang uri".
• Panghuli, pindutin ang pindutan na "OK".

3. Susunod, maaari mong isara ang email nang hindi nagse-save ng mga pagbabago.
4. Kasunod, dapat mong pindutin ang mga pindutan ng "Alt + F11".
5. Pagkatapos nito, ipapakita ang window ng editor ng Outlook VBA.
6. Ngayon, dapat mong hanapin at buksan ang proyekto na "ThisOutlookSession" at kopyahin ang sumusunod na VBA code dito.

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

7. Sa wakas, maaari mong isara ang kasalukuyang window at subukan ang macro na ito.

• Una, pumili ng maraming mga email sa listahan ng mail.
• Pagkatapos, mag-right click sa kanila.
• Susunod, piliin at pindutin ang opsyong "Parehong Tugon" sa menu ng konteksto.
• Pagkatapos, kakailanganin mong tukuyin ang template na ginamit para sa pagtugon.
• Matapos ang pag-input ng pangalan at pagpindot sa "OK", ipapadala ang parehong tugon sa mga napiling email.

Ang Outlook ay Madaling Magkaroon ng Korapsyon

Bilang isang regular na gumagamit ng Outlook, napapailalim ako sa iba't ibang mga error. Samakatuwid, gumawa ako ng iba't ibang mga hakbang upang mapangalagaan ang aking data sa Outlook. Gayunpaman, dahil sa ang katunayan na ang Outlook ay madaling kapitan ng pinsala at pag-crash ay mahirap na hinulaan, kailangan kong panatilihing handa sa lahat ng oras. Halimbawa, upang mailigtas ang aking data sa lalong madaling panahon, pinananatili kong madaling gamitin ang isang kapansin-pansin na tool sa pag-recover - DataNumen Outlook Repair. May kakayahang ayusin ang Outlook file na walang anumang abala.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang sql katiwalian at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa