Sie senden eine E-Mail an mehrere Empfänger und geben einige davon in das Feld „BCC“ ein. Wenn Sie später nur eine zweite E-Mail an die BCC-Empfänger senden möchten, können Sie die in diesem Artikel beschriebenen Mittel verwenden.
Haben Sie jemals Outlook-E-Mails an mehrere Empfänger gesendet, einige davon im Feld "BCC"? Manchmal möchten Sie nach dem Senden einer solchen E-Mail möglicherweise eine zweite an einen bestimmten Empfängertyp senden, z. B. an BCC-Empfänger. Sie möchten ihnen beispielsweise bestimmte zusätzliche Notizen senden. Jetzt stellen wir Ihnen zwei Möglichkeiten vor. Ersteres verwendet Kopieren und Einfügen. Und letzteres ist aufgrund des VBA-Codes tatsächlich viel effektiver. Sie können entweder nach Ihren Wünschen wählen.
Methode 1: BCC-Empfänger manuell in neue E-Mail kopieren
- Wählen Sie zunächst in der E-Mail-Liste des Ordners "Gesendete Objekte" die ursprüngliche E-Mail aus.
- Doppelklicken Sie dann auf diese E-Mail, um sie in einem eigenen Nachrichtenfenster zu öffnen.
- Wählen Sie anschließend im neuen Fenster einen Empfänger in der Zeile „BCC“ aus.
- Drücken Sie anschließend „Strg + A“, um alle BCC-Empfänger auszuwählen.
- Klicken Sie später mit der rechten Maustaste und wählen Sie "Kopieren" aus dem Kontextmenü.
- Schließen Sie danach diese E-Mail.
- Erstellen Sie dann eine neue E-Mail über die Schaltfläche "Neue E-Mail" auf der Registerkarte "Startseite".
- Zuletzt fügen Sie die kopierten BCC-Empfänger in das Feld "An" dieser neuen E-Mail ein.
- Derzeit können Sie diese neue Mail nach Belieben verfassen und versenden
Methode 2: Senden Sie eine zweite E-Mail über VBA an die BCC-Empfänger
- Drücken Sie zunächst „Alt + F11“, um auf den VBA-Editor zuzugreifen.
- Fügen Sie dann den folgenden VBA-Code in ein nicht verwendetes Modul ein.
Sub SendAnotherEmailToBCCRecipients()
Dim objOriginalMail As Outlook.MailItem
Dim objRecipient As Outlook.Recipient
Dim objNewMail As Outlook.MailItem
Dim objNewRecipient As Outlook.Recipient
'Get source email
Select Case TypeName(Application.ActiveWindow)
Case "Inspector"
Set objOriginalMail = ActiveInspector.CurrentItem
Case "Explorer"
Set objOriginalMail = ActiveExplorer.Selection.Item(1)
End Select
'Copy the BCC recipients to "To" field in new mail
Set objNewMail = Outlook.Application.CreateItem(olMailItem)
For Each objRecipient In objOriginalMail.Recipients
If objRecipient.Type = olBCC Then
Set objNewRecipient = objNewMail.Recipients.Add(objRecipient)
objNewRecipient.Type = olTo
objNewRecipient.Resolve
End If
Next
'Change the new email details
With objNewMail
.Subject = "Additional Notes for " & objOriginalMail.Subject
.Body = "Type mail body here....."
.Attachments.Add ("E:\Dos & Don'ts.txt")
.Importance = olImportanceHigh
.ReadReceiptRequested = True
.Send
.Display
End With
End Sub
- Fügen Sie dieses Makro anschließend zur Symbolleiste für den Schnellzugriff hinzu.So führen Sie VBA-Code in Outlook aus".
- Probieren Sie dieses Makro jetzt aus.
- Wählen oder öffnen Sie zunächst die ursprüngliche E-Mail.
- Klicken Sie dann in der Symbolleiste für den Schnellzugriff auf das Makro.
- Als nächstes wird eine neue E-Mail verschickt. Die Empfänger sind die BCC-Empfänger der ursprünglichen E-Mail, wie im folgenden Bild dargestellt.
Retten Sie Ihre Outlook-Daten rechtzeitig ab
Es ist sehr ratsam, Outlook reparieren sobald Ihr Outlook beschädigt ist. Sie können zunächst auf das integrierte Reparaturdienstprogramm Scanpst zurückgreifen. Manchmal kann es jedoch zu Scanpst-Fehlern kommen, da der Schaden die Möglichkeiten des Posteingangstools überschritten hat. Zu diesem Zeitpunkt besteht Ihr letzter Ausweg darin, ein vertrauenswürdiges und robustes Tool von Drittanbietern zu verwenden, wie z DataNumen Outlook Repair.
Einführung des Autors:
Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich beschädigtes mdf und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX