טיפ: שפות אחרות הן Google-Translated. אתה יכול לבקר את English גרסה של קישור זה.
התחבר
x
or
x
x
הירשם
x

or

כיצד לספור הודעות דוא"ל לפי קטגוריה ב- Outlook?

ייתכן שהדגשת הודעות דוא"ל עם קטגוריות צבעים ב- Outlook. אבל, האם אתה יודע איך לספור הודעות דוא"ל לפי קטגוריות? מאמר זה יחלק שני פתרונות:

Kutools עבור Outlook: 100 + כלים מתקדמים חדשים עבור Outlook.
הכרטיסייה 'משרד': אפשר עריכת לשוניות וגלישה ב- Office, בדיוק כמו Chrome, Firefox, IE 8 / 9 / 10.
תפריט קלאסי: הבא תפריטים ישנים סרגלי כלים חזרה אל 2007, 2010, 2013, 2016 ו- 2019.

חץ כחול בועה ימין ספירת הודעות דוא"ל לפי קטגוריה ב- Outlook עם תכונת חיפוש מיידי

שיטה זו תנחה יו כדי לברר את כל הודעות הדוא"ל המסומנות עם קטגוריות צבע שצוין על ידי חיפוש מיידי תכונה, ולאחר מכן בקלות לקבל את המספר הכולל של כל תוצאות החיפוש ב שורת מצב.

1. בתוך ה Mail תצוגה, לחץ על Ctrl + E מקשים בו זמנית כדי להפעיל את כלי חיפוש.

2. קליק חיפוש > מסווג, ולאחר מכן בחר את הקטגוריה שצוין צבע תוכלו לספור הודעות דוא"ל על ידי.

3. עכשיו כל הודעות הדוא"ל המסומנות עם הקטגוריה הצבע שצוין הם מצאו את המפורטים ברשימת הדואר. ואתה יכול בקלות לקבל את המספר הכולל של כל תוצאות החיפוש בשורת המצב. ראה צילום מסך:

הערות:

(1) לספירת הודעות דוא"ל המסומנות ב - קטגוריה צהוב ו קטגוריה כתום בעת ובעונה אחת, הקלד את קריטריוני החיפוש קטגוריה: = "קטגוריה צהוב" ו "כתום קטגוריה" אל חיפוש מיידי 49 you

(2) לספירת הודעות דוא"ל המסומנות ב - קטגוריה צהוב or קטגוריה כתום בעת ובעונה אחת, הקלד את קריטריוני החיפוש קטגוריה: = "צהוב קטגוריה" OR "כתום קטגוריה" אל חיפוש מיידי תיבת 49


חץ כחול בועה ימין ספירת הודעות דוא"ל לפי קטגוריה ב- Outlook עם VBA

שיטה זו תציג VBA לספור הודעות דוא"ל לפי קטגוריה בטווח תאריכים מותאם אישית ב- Outlook. אנא בצע את הפעולות הבאות:

1. בתוך ה Mail להציג, בחר את תיקיית הדוא"ל כי תוכל לספור הודעות דוא"ל.

2. ללחוץ אחר + F11 מקשים בו זמנית כדי לפתוח את החלון של Microsoft Visual Basic for Applications.

3. קליק הַבלָעָה > מודול, ולאחר מכן להדביק קוד VBA לתוך חלון הפתיחה החדשה מודול:

VBA: ספירת מיילים לפי קטגוריה ב - Outlook

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. לחץ על F5 או לחץ על לחצן הפעלה כדי להפעיל את VBA זה.

5. (1) בתיבת הדו-שיח הראשונה של Microsoft Outlook, הקלד את תאריך ההתחלה של טווח התאריכים המותאם אישית שתספור הודעות דוא"ל בתוך, ולחץ על OK לַחְצָן. (2) בתיבת הדו-שיח השנייה של Microsoft Outlook, הקלד את תאריך הסיום ולחץ על הלחצן OK לַחְצָן. ראה צילומי מסך:

ועכשיו תיבת דו-שיח יוצאת ומציגה את מספר הודעות האימייל המסומנות בקטגוריות צבע. ראה צילום מסך:


חץ כחול בועה ימיןמאמרים נוספים



Kutools עבור Outlook

יותר מ 100 פונקציות מתקדמות עבור Outlook 2010, 2013, 2016, 2019 ו- 365

צילומי מסך עבור. עבור באנר

תכונות נוספות | הורדה חינמית | רק 39.00 $ עבור מאות פונקציות

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Abhishek Singhal · 5 months ago
    Hi Thanks, it works perfectly, just one quick query- Can we get the Msgbox results to be displayed in excel, as whenever i want to run the macro it should be displayed in excel.
    every time one below the previous results.
  • To post as a guest, your comment is unpublished.
    Emma · 2 years ago
    This is perfect, but how can I change the VBA to include subfolders of the current folder in the count?