จะป้องกันการส่งไฟล์แนบไปยังผู้รับ CC และ BCC เมื่อเขียนอีเมลใน Outlook ได้อย่างไร

อย่างที่เราทราบกันดีว่าผู้รับทั้งหมดในช่อง "ถึง" "CC" หรือ "BCC" จะได้รับไฟล์แนบเมื่อส่งอีเมลพร้อมไฟล์แนบ อย่างไรก็ตามผู้ใช้บางรายต้องการส่งไฟล์แนบไปยังผู้รับ "ถึง" เท่านั้นโดยผู้รับ "CC" และ "BCC" จะได้รับข้อความโดยไม่มีไฟล์แนบ คุณจะแก้งานนี้ใน Outlook ได้อย่างไร

ป้องกันการส่งไฟล์แนบไปยังผู้รับ CC และ BCC เมื่อเขียนอีเมลด้วยรหัส VBA

ป้องกันการส่งไฟล์แนบไปยังผู้รับ CC และ BCC เมื่อเขียนอีเมลด้วยรหัส VBA

ในความเป็นจริง Outlook ไม่มีตัวเลือกสำหรับจัดการกับงานนี้ แต่รหัส VBA ต่อไปนี้สามารถช่วยคุณได้โปรดทำตามนี้:

1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน ดับเบิลคลิก นี้OutlookSession จาก โครงการ 1 (VbaProject.O ™) บานหน้าต่างเพื่อเปิดโหมดจากนั้นคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลเปล่า

รหัส VBA: ป้องกันการส่งไฟล์แนบไปยังผู้รับ CC และ BCC:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim xMailItem As Outlook.MailItem
Dim xNewMail As Outlook.MailItem
If Item.Class <> olMail Then Exit Sub
Set xMailItem = Item
Set xNewMail = Outlook.Application.CreateItem(olMailItem)
With xNewMail
    .CC = xMailItem.CC
    .BCC = xMailItem.BCC
    .Subject = xMailItem.Subject
    .HTMLBody = xMailItem.HTMLBody
    .Send
End With
xMailItem.CC = ""
xMailItem.BCC = ""
End Sub

doc cc โดยไม่มีไฟล์แนบ 1

3. จากนั้นบันทึกและปิดหน้าต่างโค้ด

4. จากนี้ไป เมื่อส่งอีเมลพร้อมไฟล์แนบ เฉพาะผู้รับในช่องถึงเท่านั้นที่สามารถรับไฟล์แนบได้ และผู้รับใน CC และ BCC สามารถรับได้เฉพาะข้อความโดยไม่มีไฟล์แนบเท่านั้น