Wie kann verhindert werden, dass beim Erstellen von E-Mails in Outlook Anhänge an CC- und BCC-Empfänger gesendet werden?

Wie wir alle wissen, erhalten alle Empfänger in den Feldern "An", "CC" oder "BCC" die Anhänge, wenn sie E-Mails mit Anhängen senden. Einige Benutzer möchten die Anhänge jedoch nur an die Empfänger "An" senden, wobei die Empfänger "CC" und "BCC" die Nachricht nur ohne die Anhänge erhalten. Wie können Sie diesen Job in Outlook lösen?

Verhindern Sie das Senden von Anhängen an CC- und BCC-Empfänger, wenn Sie E-Mails mit VBA-Code verfassen

Verhindern Sie das Senden von Anhängen an CC- und BCC-Empfänger, wenn Sie E-Mails mit VBA-Code verfassen

Tatsächlich bietet Outlook keine Option für die Bearbeitung dieser Aufgabe, aber der folgende VBA-Code kann Ihnen einen Gefallen tun. Bitte tun Sie Folgendes:

1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Fenster, Doppelklick DieseOutlookSession von dem Projekt1 (VbaProject.OTM) Bereich, um den Modus zu öffnen, und kopieren Sie dann den folgenden Code und fügen Sie ihn in das leere Modul ein.

VBA-Code: Verhindern Sie das Senden von Anhängen an CC- und BCC-Empfänger:

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 ohne Anhang 1

3. Anschließend speichern und schließen Sie das Codefenster.

4. Wenn Sie von nun an eine E-Mail mit Anhängen senden, können nur die Empfänger im Feld „An“ die Anhänge empfangen, und die Empfänger in CC und BCC können die Nachricht nur ohne Anhänge erhalten.