Wie zählt man E-Mails in Outlook nach Kategorie?

E-Mails nach Kategorie in Outlook mit der Sofortsuche-Funktion zählen

E-Mails nach Kategorie in Outlook mit VBA zählen

Mit dieser Methode finden Sie mithilfe der Sofortsuche-Funktion ganz einfach alle E-Mails, die mit der angegebenen Farbkategorie markiert sind. Die Gesamtanzahl der Suchergebnisse sehen Sie anschließend direkt in der Statusleiste unten.

1. Wechseln Sie in der E-Mail-Ansicht gleichzeitig die Tasten Strg+E, um die Suchoptionen zu aktivieren.

2. Klicken Sie auf Suche > Kategorisiert und wählen Sie anschließend die Farbkategorie aus, nach der Sie E-Mails zählen möchten.

3. Nun werden alle E-Mails, die mit der angegebenen Farbkategorie markiert sind, gefunden und in der E-Mail-Liste angezeigt. Die Gesamtanzahl der Suchergebnisse können Sie bequem in der Statusleiste unten ablesen. Siehe Screenshot:

Hinweise:

(1) Um E-Mails zu zählen, die sowohl mit der Kategorie „Gelb“als auchmit der Kategorie „Orange“ markiert sind, geben Sie direkt in das Suchfeld folgendes Suchkriterium ein: category:="Gelbe Kategorie" AND "Orangene Kategorie".Sofortsuche-Feld:

(2) Um E-Mails zu zählen, die entweder mit der Kategorie „Gelb“oder mit der Kategorie „Orange“ markiert sind, geben Sie direkt in das Sofortsuche-Feld folgendes Suchkriterium ein: category:="Gelbe Kategorie" OR "Orangene Kategorie".

Diese Methode stellt ein VBA-Skript vor, mit dem Sie E-Mails in Outlook nach Kategorie innerhalb eines benutzerdefinierten Datumsbereichs zählen können. Gehen Sie dazu wie folgt vor:

1. Wechseln Sie in der E-Mail-Ansicht zu dem E-Mail-Ordner, für den Sie die Anzahl der E-Mails ermitteln möchten.

2. Drücken Sie gleichzeitig die Tasten Alt+F11, um das Fenster „Microsoft Visual Basic for Applications“ zu öffnen.

3. Klicken Sie auf Einfügen > Modul und fügen Sie anschließend den folgenden VBA-Code in das neu geöffnete Modulfenster ein:

VBA: E-Mails nach Kategorie in Outlook zählen

Sub CategoriesEmails()

Dim oFolder As MAPIFolder
Dim oDict As Object
Dim sStartDate As String
Dim sEndDate As String
Dim oItems As Outlook.Items
Dim sStr As String
Dim sMsg As String


On Error Resume Next
Set oFolder = Application.ActiveExplorer.CurrentFolder

Set oDict = CreateObject("Scripting.Dictionary")

sStartDate = InputBox("Type the start date (format MM/DD/YYYY)")
sEndDate = InputBox("Type the end date (format MM/DD/YYYY)")

Set oItems = oFolder.Items.Restrict("[Received] >= '" & sStartDate & "' And [Received] <= '" & sEndDate & "'")
oItems.SetColumns ("Categories")

For Each aitem In oItems
sStr = aitem.Categories
If Not oDict.Exists(sStr) Then
oDict(sStr) = 0
End If
oDict(sStr) = CLng(oDict(sStr)) + 1
Next aitem

sMsg = ""
For Each aKey In oDict.Keys
sMsg = sMsg & aKey & ":   " & oDict(aKey) & vbCrLf
Next
MsgBox sMsg

Set oFolder = Nothing

 End Sub

4. Drücken Sie die F5-Taste oder klicken Sie auf die Schaltfläche „Ausführen“, um das VBA-Skript auszuführen.

5. (1) Geben Sie im ersten erscheinenden Microsoft-Outlook-Dialogfeld das Startdatum des benutzerdefinierten Datumsbereichs ein, innerhalb dessen Sie E-Mails zählen möchten, und klicken Sie auf die OK-Schaltfläche. (2) Geben Sie im zweiten Microsoft-Outlook-Dialogfeld das Enddatum ein und klicken Sie auf die OK-Schaltfläche. Siehe Screenshots:

Nun erscheint ein Dialogfeld, das die Anzahl der mit einer Farbkategorie markierten E-Mails anzeigt. Siehe Screenshot:

Gesamtanzahl der Suchergebnisse in Outlook zählen

In Outlook verbrachte Stunden/Tage/Wochen für einen Termin oder eine Besprechung zählen

Die E-Mail-Anzahl nach Betreff in Outlook zählen

Gesamtanzahl eingehender E-Mails pro Tag in Outlook zählen

Gesamtanzahl ausgewählter E-Mails in Outlook zählen