Zum Hauptinhalt springen

Kutools für Office — Eine Suite. Fünf Tools. Erledigen Sie mehr.

Wie zählt man die Anzahl der markierten E-Mails in Outlook?

Author Xiaoyang Last modified

In Outlook können Sie E-Mails, Kontakte oder Aufgaben markieren, um sie hervorzuheben. Manchmal möchten Sie jedoch die Anzahl der markierten Elemente in Ihrem Outlook zählen. Wie könnten Sie diese Aufgabe in Outlook bewältigen?

Anzahl der markierten E-Mails in einem Konto mit Suchordnern zählen

Anzahl der markierten E-Mails / Kontakte / Aufgaben separat in allen Konten mit VBA-Code zählen


a name="a1"> Anzahl der markierten E-Mails in einem Konto mit Suchordnern zählen

Um die Anzahl der markierten E-Mails in einem Outlook-Konto zu zählen, kann Ihnen die Funktion „Suchordner“ helfen. Gehen Sie wie folgt vor:

1. Klicken Sie mit der rechten Maustaste auf „Suchordner“ unter Ihrem E-Mail-Konto und wählen Sie dann „Neuer Suchordner“, siehe Screenshot:

doc count flagged items 1

2. Dann öffnet sich ein Dialogfeld „Neuer Suchordner“. Klicken Sie auf die Option „E-Mails für Nachverfolgung markiert“ im Abschnitt „E-Mails lesen“, siehe Screenshot:

doc count flagged items 2

3. Klicken Sie dann auf „OK“ und alle markierten Nachrichten werden in den Ordner „ Für Nachverfolgung“ kopiert. Die Gesamtanzahl der markierten E-Mails wird wie im folgenden Screenshot angezeigt:

doc count flagged items 3

a name="a2"> Anzahl der markierten E-Mails / Kontakte / Aufgaben separat in allen Konten mit VBA-Code zählen

Wenn Sie die Anzahl aller markierten Elemente, wie E-Mails, Kontakte und Aufgaben, in Outlook separat zählen möchten, kann Ihnen der folgende VBA-Code helfen.

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster „Microsoft Visual Basic for Applications“ zu öffnen.

2. Klicken Sie dann auf „Einfügen“ > „Modul“ und kopieren und fügen Sie den unten stehenden Code in das geöffnete leere Modul ein, siehe Screenshot:

VBA-Code: Anzahl der markierten Elemente in Outlook zählen:

Dim GSeparateCount, GMailCount, GContactCount, GTaskCount As Long
Sub CountFlaggedItems()
Dim xStore As Outlook.Store
Dim xTotalCount As Long
Dim xPrompt As String
Dim xFolder As Folder
Dim i, k As Integer
On Error Resume Next
xTotalCount = 0
GMailCount = 0
GContactCount = 0
GTaskCount = 0
For Each xStore In Application.Session.Stores
    For Each xFolder In xStore.GetRootFolder.Folders
       Call ProcessFolders(xFolder)
    Next
Next
xTotalCount = GMailCount + GContactCount + GTaskCount
xPrompt = xTotalCount & " items have been flagged, as follows: " & Chr(10) & Chr(10) & "Emails: " & GMailCount & Chr(10) & "Contacts: " & GContactCount & Chr(10) & "Tasks: " & GTaskCount
MsgBox xPrompt, vbInformation + vbOKOnly, "Kutools for Outlook"
End Sub
Sub ProcessFolders(ByVal CurFolder As Outlook.Folder)
Dim xSubfolder As Outlook.Folder
Dim xItem As Object
Dim i, k As Integer
On Error Resume Next
For i = CurFolder.Items.Count To 1 Step -1
    Set xItem = CurFolder.Items.item(i)
    Select Case xItem.Class
        Case olMail, olPost, olSharing
            If xItem.IsMarkedAsTask = True Then
                GMailCount = GMailCount + 1
            End If
        Case olContact, olDistList
            If xItem.IsMarkedAsTask = True Then
                GContactCount = GContactCount + 1
            End If
        Case olTask
            If CurFolder.DefaultItemType = olTaskItem Then
            GTaskCount = GTaskCount + 1
            End If
    End Select
Next i
If CurFolder.Folders.Count > 0 Then
        For k = CurFolder.Folders.Count To 1 Step -1
            Set xSubfolder = CurFolder.Folders.item(k)
            Call ProcessFolders(xSubfolder)
        Next k
    End If
End Sub
doc count flagged items 4

3. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und es erscheint ein Hinweisfenster, das Ihnen die Gesamtanzahl aller markierten Elemente anzeigt, wie im folgenden Screenshot gezeigt:

doc count flagged items 5

Anzahl der heutigen, gestrigen, gelesenen, ungelesenen, Gesamtelemente... in Outlook zählen

Mit dem leistungsstarken Statistik-Feature von Kutools für Outlook können Sie die Anzahl der Elemente basierend auf dem Datum, ausgewählten Elementen, gelesen, ungelesen und vieles mehr erhalten, je nach Bedarf.

doc count flagged items 6
Kutools für Outlook: Mit über 70+ praktischen und kostenlosen Outlook-Add-ins, laden Sie jetzt die kostenlose Version herunter.

Beste Office-Produktivitätstools

Eilmeldung: Kutools für Outlook veröffentlicht kostenlose Version!

Erleben Sie das brandneue Kutools für Outlook mit über100 unglaublichen Funktionen! Jetzt herunterladen!

🤖 Kutools AI : Nutzt fortschrittliche KI-Technologie, um E-Mails mühelos zu verwalten – inklusive Antworten, Zusammenfassen, Optimieren, Erweitern, Übersetzen und Verfassen von E-Mails.

📧 E-Mail-Automatisierung: Automatische Antwort (verfügbar für POP und IMAP)/E-Mail senden planen/Automatische CC/BCC nach Regel beim Senden von E-Mail/Automatische Weiterleitung (Erweiterte Regeln) /Begrüßung automatisch hinzufügen/E-Mails mit mehreren Empfängern automatisch in einzelne E-Mails aufteilen...

📨 E-Mail-Management: E-Mail zurückrufen/Betrugs-E-Mails nach Betreff und anderen Kriterien blockieren/Duplikate löschen/Erweiterte Suche/Ordner organisieren...

📁 Anhänge Pro:Stapel speichern/Stapel ablösen/Stapel komprimieren/Automatisch speichern/Automatisch abtrennen/Automatische Komprimierung...

🌟 Interface-Magie: 😊Mehr schöne und coole Emojis /Benachrichtigung bei wichtigen E-Mails/Outlook minimieren statt schließen...

👍 Ein-Klick-Genies: Allen mit Anhängen antworten /Anti-Phishing-E-Mails/🕘Zeitzone des Absenders anzeigen...

👩🏼‍🤝‍👩🏻 Kontakte & Kalender: Stapel Kontakt aus ausgewählten E-Mails hinzufügen/Kontaktgruppe in einzelne Gruppen aufteilen/Geburtstagserinnerung entfernen...

Verwenden Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere!

Schalten Sie Kutools für Outlook sofort mit einem einzigen Klick frei. Nicht zögern, jetzt herunterladen und Ihre Effizienz steigern!

kutools for outlook features1 kutools for outlook features2

🚀 Ein-Klick-Download — alle Office-Add-Ins verfügbar

Dringend empfohlen: Kutools für Office (5-in-1)

Mit einem Klick laden Sie fünf Installationsprogramme gleichzeitig herunter — Kutools für Excel, Outlook, Word, PowerPoint und Office Tab Pro. Jetzt herunterladen!

  • Ein-Klick-Komfort: Laden Sie alle fünf Installationspakete in nur einem Schritt herunter.
  • 🚀 Für jede Office-Aufgabe bereit: Installieren Sie die benötigten Add-Ins genau dann, wenn Sie sie brauchen.
  • 🧰 Enthalten: Kutools für Excel / Kutools für Outlook / Kutools für Word / Office Tab Pro / Kutools für PowerPoint