Jak zabránit odesílání příloh příjemcům CC a BCC při psaní e-mailu v aplikaci Outlook?

Jak všichni víme, všichni příjemci v polích „Komu“, „CC“ nebo „BCC“ dostanou přílohy při odesílání e-mailů s přílohami. Někteří uživatelé však chtějí poslat přílohy pouze příjemcům „Komu“, přičemž příjemcům „CC“ a „BCC“ se zpráva zobrazí pouze bez příloh. Jak byste mohli vyřešit tuto práci v Outlooku?

Při psaní e-mailu s kódem VBA zabraňte odesílání příloh příjemcům CC a BCC

Při psaní e-mailu s kódem VBA zabraňte odesílání příloh příjemcům CC a BCC

Ve skutečnosti Outlook nenabízí možnost řešení tohoto úkolu, ale následující kód VBA vám může udělat laskavost, udělejte to takto:

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikace okno, dvakrát klikněte ThisOutlookSession z Project1 (VbaProject.OTM) v podokně otevřete režim a poté zkopírujte a vložte následující kód do prázdného modulu.

Kód VBA: Zabraňte odesílání příloh příjemcům CC a 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 bez přílohy 1

3. Poté uložte a zavřete okno s kódem.

4. Od nynějška při odesílání e-mailu s přílohami mohou přílohy přijímat pouze příjemci v poli Komu a příjemci v kopii a skrytá kopie mohou dostávat pouze zprávu bez příloh.