როგორ სწრაფად გამოვრიცხოთ ორიგინალი „CC“ მიმღებები Outlook-ში „ყველაზე პასუხის გაცემა“ გამოყენებისას

„ყველაზე პასუხის გაცემა“ გამოყენებისას, საპასუხო ელფოსტა ასევე შეიცავს ორიგინალური ელფოსტის „CC“ მიმღებებს „CC“ ველში. მაგრამ, თუ გსურთ ამ ტიპის მიმღების გამორიცხვა, შეგიძლიათ გამოიყენოთ ამ სტატიაში წარმოდგენილი მეთოდი.

ზოგჯერ, გსურთ უპასუხოთ ელფოსტას თავდაპირველ გამგზავნს და მიმღებს. ამ სცენარში, თქვენ აუცილებლად იფიქრებთ „ყველაზე პასუხის გაცემა“ ოფციის გამოყენებაზე. თუმცა, ამ გზით, თუ ორიგინალ ფოსტას ასევე ჰყავს „CC“ მიმღებები, ელ.წერილი „პასუხი ყველას“ ავტომატურად დააკოპირებს „CC“ მიმღებებს „CC“ ველში. თუ არ გსურთ მათზე პასუხის გაცემა, ხელით უნდა წაშალოთ ისინი, რაც ცოტა პრობლემურია. ახლა, შემდეგში, ჩვენ გასწავლით, თუ როგორ უნდა მისცეთ Outlook-ს ავტომატური განხორციელების უფლება თქვენი საჭიროების მიხედვით.

სწრაფად გამორიცხეთ ორიგინალი „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

4. შემდგომში, გადატვირთეთ თქვენი Outlook ამ ახალი პროექტის გასააქტიურებლად.
5. მას შემდეგ, ყოველ ჯერზე, როდესაც დააჭერთ ღილაკს „ყველაზე პასუხის გაცემა“, თქვენ მიიღებთ მოთხოვნას, როგორც ეს ნაჩვენებია შემდეგ სურათზე, რომელშიც გეკითხებით, გსურთ თუ არა ორიგინალური CC მიმღებების გამორიცხვა.
6. თუ აირჩევთ „დიახ“, Outlook ავტომატურად წაშლის მიმღებებს „CC“ ველში.

კარგად მოემზადეთ Outlook-ის დაზიანებისთვის

როგორც ყველამ ვიცით, ვერავინ შეძლებს 100%-ით უზრუნველყოს Outlook-ის დაზიანებისგან დაცვა. ამიტომ, Outlook-ის ყველა რეგულარული მომხმარებლისთვის აუცილებელია მრავალი სიფრთხილის ზომების მიღება. უპირველეს ყოვლისა, ერთ-ერთი ყველაზე მნიშვნელოვანი არის Outlook-ის მონაცემების მუდმივი და განახლებული სარეზერვო ასლის შექმნა. შემდეგ, აუცილებელია ისწავლოთ შემოსულების აღდგენის ინსტრუმენტის გამოყენება. და ბოლოს, გონივრული და რეკომენდებულია გამოცდილი მომხმარებლის ყოლა. Outlook შესწორება ინსტრუმენტი სიახლოვეს, როგორიცაა DataNumen Outlook Repair.

ავტორი შესავალი:

შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის მდფ-ის აღდგენა და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად