2 Methoden zum Zählen der Anzahl der Empfänger in einer Outlook-E-Mail

Manchmal möchten Sie möglicherweise die Gesamtzahl der Empfänger in einer bestimmten E-Mail berechnen. Outlook verfügt jedoch über keine offensichtliche Zählfunktion, um dies zu unterstützen. In diesem Artikel werden zwei Ansätze vorgestellt, um dies zu erreichen.

In einigen Situationen möchten Sie beispielsweise die Gesamtzahl dieser Empfänger ermitteln, wenn Sie einer E-Mail eine große Anzahl von Empfängern hinzugefügt haben und Schwierigkeiten haben, diese zu verwalten. Outlook hat jedoch keine native oder Standardunterstützung zum Zählen. Daher müssen Sie einige zusätzliche Anstrengungen unternehmen, um dies zu erreichen. Hier erklären wir Ihnen 2 Methoden.

Methode 1: Zählen Sie die Anzahl der Empfänger über die Kontaktgruppe

1. Als Erstes sollten Sie alle Empfänger in den Feldern „An“, „CC“ und „BCC“ auswählen und in den leeren Bereich des Nachrichtentextes kopieren.
2. Wählen Sie dann alle Empfänger im Text aus und kopieren Sie sie ebenfalls.
3. Gehen Sie anschließend zum Bereich Outlook-Kontakte und klicken Sie auf "Neue Kontaktgruppe". Legen Sie im Popup-Fenster den Namen als "Temp" fest, klicken Sie auf "Mitglieder hinzufügen" und wählen Sie "Aus Adressbuch" aus der Dropdown-Liste.
4. Fügen Sie anschließend die zuvor kopierten Empfänger wie im folgenden Screenshot in das Feld "Mitglied ->" ein:
5. Klicken Sie anschließend auf die Schaltfläche „OK“ und kehren Sie zur Kontaktgruppe zurück. Alle Duplikate werden automatisch entfernt. Speichern Sie es nun auf der lokalen Festplatte als "Text" -Datei.
6. Öffnen Sie später die Textdatei und entfernen Sie den nutzlosen Header wie im Bild unten:
7. Schließlich können Sie den Cursor in die letzte Zeile setzen. Sie sehen die Gesamtzahl der Zeilen in der Statusleiste. Das ist die Gesamtzahl der Empfänger.

Methode 2: Zählen Sie die Anzahl der Empfänger mit Outlook VBA

1. Drücken Sie zunächst die Tasten „Alt + F11“, um auf das Fenster „Visual Basic“ zuzugreifen.
2. Kopieren Sie anschließend die folgenden VBA-Codes und fügen Sie sie in ein neues Modul ein.

Sub CountRecipients()
    Dim obApp As Outlook.Application
    Dim olSel As Selection
    Dim olItem As MailItem
    Dim Recips As Recipients
    Dim strMsg As String
    Dim nRes As Integer
 
    Set obApp = Outlook.Application
 
    If TypeName(obApp.ActiveWindow) = "Inspector" Then
       Set olItem = obApp.ActiveInspector.CurrentItem
       Set Recips = olItem.Recipients
       strMsg = "The current message contains " & Recips.Count & " recipient(s)."
       nRes = MsgBox(strMsg, vbOKOnly + vbInformation, "Count Recipients")
    Else
       Set olItem = obApp.ActiveExplorer.Selection.Item(1)
       Set Recips = olItem.Recipients
       strMsg = "The selected message contains " & Recips.Count & " recipient(s)."
       nRes = MsgBox(strMsg, vbOKOnly + vbInformation, "Count Recipients")
    End If
 
    Set obApp = Nothing
    Set olSel = Nothing
    Set olItem = Nothing
    Set Recips = Nothing
End Sub

3. Danach können Sie das Fenster „Visual Basic“ verlassen und das neue Makro zur Symbolleiste für den Schnellzugriff des Outlook-Hauptfensters und des Nachrichtenfensters hinzufügen.
4. Schließlich können Sie versuchen:

• Wenn Sie eine E-Mail auswählen und auf die Schaltfläche in der Symbolleiste für den Schnellzugriff klicken, erhalten Sie eine Nachricht wie das folgende Bild:
• Wenn Sie eine E-Mail öffnen und auf die Schaltfläche klicken, wird ein Dialogfeld angezeigt (siehe Abbildung unten):

Hinweis: Diese Methode behandelt eine Kontaktgruppe als einen Empfänger und umgeht die doppelten Empfänger nicht.

Kampf gegen gefährliche Makros

Wie wir alle wissen, gehören Viren in E-Mails zu den häufigsten Bedrohungen für Daten. Daher ist es unerlässlich, Outlook so zu konfigurieren, dass nur digital signierte Makros aktiviert sind, die Viren und Malware blockieren können. Außerdem sollten Sie stets ein robustes Backup Ihrer E-Mail-Adresse bereithalten. beschädigtes Dienstprogramm zur Reparatur von Outlook-Dateien, sowie DataNumen Outlook Repair. Dies ist praktisch, wenn Ihr Outlook unter einer Virusinfektion oder einem Malware-Angriff leidet.

Einführung des Autors:

Shirley Zhang ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich Reparieren Sie den SQL-MDF-Datenfehler und Outlook-Reparatursoftwareprodukte. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX