Outlook-д "Reply All" -г ашиглахдаа анхны "CC" хүлээн авагчдыг хэрхэн хурдан хасах вэ

"Бүгдэд нь хариу бичих" -ийг ашиглахдаа хариу имэйл нь "СС" талбарт анхны имэйлийн "СС" хүлээн авагчдыг оруулах болно. Гэхдээ хэрэв та энэ төрлийн хүлээн авагчийг хасахыг хүсвэл энэ нийтлэлийг нэвтрүүлсэн аргыг ашиглаж болно.

Заримдаа та анхны илгээгч болон "Хэнд" хүлээн авагчид имэйлээр хариу бичихийг хүсч байна. Энэ хувилбарт та “Reply All” сонголтыг ашиглах нь гарцаагүй. Гэхдээ энэ аргаар эх захидал нь мөн "CC" хүлээн авагчтай бол "Бүгдэд хариу бичих" имэйл нь "CC" хүлээн авагчдыг "CC" талбарт автоматаар хуулж авах болно. Хэрэв та тэдэнд хариу бичихийг хүсэхгүй байвал гараар устгах хэрэгтэй бөгөөд энэ нь жаахан асуудалтай юм. Одоо дараахь зүйл дээр бид Outlook-ийг өөрийн хэрэгцээнд нийцүүлэн хэрхэн гүйцэлдүүлэхийг заах болно.

“Reply All” -г ашиглахдаа эх “СС” хүлээн авагчдыг хурдан хас.

1. Эхлэхийн тулд Outlook-г ажиллуулна уу.
2. Дараа нь VBA редактор руу хандаж өмнөх нийтлэлийг уншаад “Таны Outlook дээр VBA кодыг хэрхэн ажиллуулах вэ".
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 засах гэх мэт ойр орчмын хэрэгсэл DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. mdf-ийг сэргээх програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com