“Hammasiga javob berish”dan foydalanilganda, javob xatida “CC” maydoniga asl e-pochtaning “CC” qabul qiluvchilari ham kiritiladi. Ammo, agar siz ushbu turdagi qabul qiluvchini istisno qilmoqchi bo'lsangiz, ushbu maqolada keltirilgan usuldan foydalanishingiz mumkin.
Ba'zida siz asl jo'natuvchiga va "Kimga" oluvchilarga elektron pochta xabariga javob berishni xohlaysiz. Ushbu stsenariyda siz "Hammasiga javob berish" opsiyasidan foydalanish haqida o'ylaysiz. Shu bilan birga, agar asl xatda "CC" qabul qiluvchilari ham bo'lsa, "Hammasiga javob berish" elektron pochtasi "CC" qabul qiluvchilarini avtomatik ravishda "CC" maydoniga ko'chiradi. Agar siz ularga javob berishni xohlamasangiz, ularni qo'lda olib tashlashingiz kerak, bu biroz qiyin. Endi, quyida biz sizga Outlook-ga sizning ehtiyojlaringiz bo'yicha buni avtomatik ravishda bajarishga qanday ruxsat berishni o'rgatamiz.

“Hammasiga javob berish” funksiyasidan foydalanganda asl “CC” qabul qiluvchilarni tezda chiqarib tashlang
- Boshlash uchun Outlook-ni ishga tushiring.
- Keyin, oldingi maqolani o'qib, VBA muharririga kiring - "Outlook-da VBA kodini qanday ishlatish kerak".
- Keyinchalik, quyidagi VBA kodini "ThisOutlookSession" loyihasiga nusxalang.
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
- Keyinchalik, ushbu yangi loyihani faollashtirish uchun Outlook-ni qayta ishga tushiring.
- O'shandan beri, har safar "Hammasiga javob berish" tugmasini bosganingizda, quyidagi rasmda ko'rsatilganidek, siz asl CC oluvchilarni chiqarib tashlashni xohlaysizmi degan so'rovni olasiz.
- Agar siz "Ha" ni tanlasangiz, Outlook "CC" maydonidagi qabul qiluvchilarni avtomatik ravishda o'chiradi.
Outlook zarariga yaxshi tayyor bo'ling
Barchamizga ma'lumki, hech kim Outlook shikastlanishidan 100% himoyalana olishiga kafolat bera olmaydi. Shuning uchun, barcha Outlook doimiy foydalanuvchilari ko'plab ehtiyot choralarini ko'rishlari juda muhimdir. Avvalo, eng muhimlaridan biri bu Outlook ma'lumotlarining doimiy va yangilangan zaxira nusxasini saqlashdir. Keyin, pochta qutisini ta'mirlash vositasidan qanday foydalanishni o'rganish kerak. Va nihoyat, tajribali mutaxassisni saqlash oqilona va tavsiya etiladi. Outlook tuzatish kabi yaqin atrofdagi asbob DataNumen Outlook Repair.
Muallif kirish:
Shirli Chjan ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc mdf-ni tiklash va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com


