Ինչպե՞ս արագորեն բացառել «CC» բնօրինակ ստացողներին Outlook- ում «Reply all» - ի օգտագործման ժամանակ

Կիսվել հիմա ՝

«Պատասխանել բոլորին» օգտագործելիս պատասխանող էլփոստը կներառի նաև «ՍԴ» դաշտում բնօրինակ էլփոստի «ՍԴ» ստացողները: Բայց եթե ցանկանում եք բացառել ստացողի այս տեսակը, կարող եք օգտագործել այս հոդվածում ներկայացված մեթոդը:

Timesամանակ առ ժամանակ ցանկանում եք նամակ պատասխանել բնօրինակ ուղարկողին և «Դեպի» ստացողներին: Այս սցենարում դուք հաստատ կմտածեք օգտագործել «Պատասխանել բոլորին» տարբերակը: Այնուամենայնիվ, այս միջոցներով, եթե բնօրինակը նամակ ունի նաև «CC» ստացողներ, «Պատասխանել բոլորին» էլ. Փոստը ավտոմատ կերպով պատճենելու է «CC» հասցեատերերին «CC» դաշտում: Եթե ​​դուք չեք ցանկանում պատասխանել դրանց, ապա ստիպված եք ձեռքով հեռացնել դրանք, ինչը մի փոքր անհանգստացնող է: Այժմ հետևյալում մենք կսովորեցնենք ձեզ, թե ինչպես թույլ տալ Outlook- ին ավտոմատ կերպով իրականացնել դա ՝ ըստ ձեր կարիքների:

Ավտոմատ ներառված «CC» բնօրինակ ստացողները

Արագ բացառեք «CC» ստացողները «Պատասխանել բոլորը» օգտագործելիս

  1. Սկսելու համար գործարկեք Outlook-ը։
  2. Դրանից հետո մուտք գործեք VBA խմբագիր ՝ կարդալով նախորդ հոդվածը.Ինչպես գործարկել VBA կոդը ձեր Outlook- ում".
  3. Հաջորդը, պատճենեք հետևյալ VBA կոդը «ThisOutlookSession» նախագծում:
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objMail As Outlook.MailItem

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
    Set objExplorer = Outlook.Application.ActiveExplorer
End Sub

Private Sub objExplorer_Activate()
    On Error Resume Next
    If TypeOf objExplorer.Selection.Item(1) Is MailItem Then
       Set objMail = objExplorer.Selection.Item(1)
    End If
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is MailItem Then
       Set objMail = Inspector.CurrentItem
    End If
End Sub

'Occurs when you click "Reply All"
Private Sub objMail_ReplyAll(ByVal Response As Object, Cancel As Boolean)
    Dim objRecipient As Outlook.Recipient
    Dim i As Long
 
    'Ask you if to exclude CC recipients
    If MsgBox("Do you want to exclude original CC recipients? " , vbQuestion + vbYesNo) = vbYes Then
       'If select Yes, remove CC recipients
       For i = Response.Recipients.Count To 1 Step -1
           If Response.Recipients(i).Type = olCC Then
              Response.Recipients.Remove (i)
           End If
       Next
    End If
End Sub

VBA կոդ - «Պատասխանել բոլորը» օգտագործելիս արագորեն բացառեք «CC» բնօրինակ ստացողներին

  1. Հետագայում, վերագործարկեք ձեր Outlook-ը՝ այս նոր նախագիծը ակտիվացնելու համար։
  2. Այդ ժամանակից ի վեր, ամեն անգամ, երբ հարվածեք «Պատասխանել բոլորը» կոճակին, կստանաք հուշում, ինչպես ցույց է տրված հետևյալ նկարում, հարցնելով, թե արդյոք կցանկանայիք բացառել ՍԴ ստացողները:Հաստատում
  3. Եթե ​​ընտրեք «Այո», Outlook- ը ավտոմատ կերպով կհեռացնի ստացողներին «CC» դաշտում:«CC» բնօրինակ ստացողները հանվում են

Պատրաստ եղեք Outlook- ի վնասներին

Ինչպես բոլորս գիտենք, ոչ ոք չի կարող 100% երաշխավորել, որ ինքը կարող է ապահովագրված լինել Outlook-ի վնասից։ Հետևաբար, Outlook-ի բոլոր կանոնավոր օգտատերերի համար կարևոր է ձեռնարկել մի շարք նախազգուշական միջոցներ։ Նախևառաջ, ամենակարևորներից մեկը Outlook-ի տվյալների մշտական ​​և թարմացված պահուստային պատճենը պահելն է։ Այնուհետև, անհրաժեշտ է սովորել, թե ինչպես օգտագործել էլ. փոստի արկղի վերականգնման գործիքը։ Վերջապես, բայց ոչ պակաս կարևոր, խելամիտ է և խորհուրդ է տրվում ունենալ փորձառու... Outlook- ի շտկում գործիք հարևանությամբ, ինչպիսիք են DataNumen Outlook Repair.

Հեղինակի ներածություն.

Shirley Zhang- ը տվյալների վերականգման փորձագետ է DataNumen, Inc., որը տվյալների վերականգման տեխնոլոգիաների համաշխարհային առաջատարն է, այդ թվում վերականգնել mdf և հեռանկարների նորոգման ծրագրակազմի արտադրանքները: Լրացուցիչ տեղեկությունների համար այցելեք www.datanumen.com

Կիսվել հիմա ՝

Comments փակվում են: