Сіздің Outlook бағдарламаңызда бірдей мазмұндағы бірнеше электрондық поштаға қалай жауап беруге болады?

Outlook шешімдері Қыркүйек 29, 2025
Қазір бөлісу:

Көптеген пайдаланушылар 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 бағдарламасын түзетіңіз ешбір әбігерсіз файл.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. SQL сыбайлас жемқорлық және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.