انتقل إلى المحتوى الرئيسي

كيف تحسب العدد الإجمالي لرسائل البريد الإلكتروني الواردة يوميًا في Outlook؟

هل سبق لك أن أحسبت العدد الإجمالي لرسائل البريد الإلكتروني التي تلقيتها يوميًا؟ وهل سئمت من عدهم واحدة تلو الأخرى يدويًا دون أي طرق فعالة؟ في هذا البرنامج التعليمي ، نقدم لك حيلتين لحساب إجمالي رسائل البريد الإلكتروني يوميًا في Outlook.


احسب العدد الإجمالي لرسائل البريد الإلكتروني الواردة اليوم باستخدام ميزة البحث الفوري

في الواقع ، من السهل جدًا البحث في جميع رسائل البريد الإلكتروني الواردة اليوم في مجلد Inbox ، أو جميع مجلدات حساب البريد الإلكتروني ، أو جميع مجلدات جميع حسابات البريد الإلكتروني في Outlook ، ثم حساب العدد الإجمالي لنتائج البحث. الرجاء القيام بما يلي:

في مجلة بريد عرض، 1 حدد الرسائل مجلد لحساب بريد إلكتروني واحد ستحسب فيه رسائل البريد الإلكتروني الواردة اليوم ؛ 2 اكتب معايير البحث تلقى: اليوم في البحث الفوري مربع ، وبعد ذلك 3 حدد نطاق البحث في مجال مجموعة على بحث التبويب. انظر لقطة الشاشة:

والآن يتم عرض العدد الإجمالي لجميع نتائج البحث ، بمعنى آخر ، يتم عرض العدد الإجمالي لرسائل البريد الإلكتروني الواردة اليوم في الزاوية السفلية اليسرى من Outlook كما هو موضح أدناه.

نقرة واحدة لحساب عدد رسائل البريد الإلكتروني المحددة في Outlook

من السهل الحصول على العدد الإجمالي لجميع العناصر أو عدد العناصر غير المقروءة في مجلد Outlook. ولكن كيف يمكنك الحصول بسرعة على عدد العناصر المحددة في مجلد في Outlook؟ هنا، كوتولس لتوقعات's عد العناصر المحددة موصى به ، والذي يمكنه عرض عدد العناصر المحددة بسرعة بنقرة واحدة فقط!


حساب العدد الإجمالي لرسائل البريد الإلكتروني الواردة اليوم باستخدام ميزة "مجلد البحث"

ستوجهك هذه الطريقة لإنشاء مجلد بحث يجمع تلقائيًا جميع رسائل البريد الإلكتروني المستلمة اليوم ، وبعد ذلك يمكنك الحصول على العدد الإجمالي لرسائل البريد الإلكتروني هذه مع تغيير خصائص مجلد البحث. الرجاء القيام بما يلي:

1. حدد حساب البريد الإلكتروني الذي ستقوم بإنشاء مجلد بحث بداخله في جزء التنقل ، وانقر فوق مجلد > مجلد بحث جديد. انظر لقطة الشاشة:

2. في مجلد بحث جديد الحوار ، حدد قم بإنشاء مجلد بحث مخصص الخيار، وانقر فوق اختار زر. انظر لقطة الشاشة:

3. الآن يظهر مربع حوار مجلد البحث المخصص. يرجى تسمية مجلد البحث الجديد في الاسم مربع.

4. المضي قدما للنقر فوق المعايير زر في مجلد البحث المخصص. الآن في مربع حوار معايير مجلد البحث ، 1 انقر الرسالة التبويب، 2 حدد تلقى من الوقت: قائمة منسدلة، 3 تحديد اليوم من القائمة المنسدلة التالية ، ثم 4 انقر على OK زر. انظر لقطة الشاشة:

5. الآن يعود إلى مجلد البحث المخصص الحوار ، الرجاء الضغط تصفح زر. ثم في مربع الحوار تحديد مجلد (مجلدات) ، 1 يرجى التحقق فقط الرسائل في ال المجلدات مربع القائمة ، تحقق بحث في المجلدات الفرعية الخيار، وانقر فوق OK زر. انظر لقطة الشاشة:

6. ثم انقر فوق OK على التوالي لإغلاق مربع الحوار "مجلد البحث المخصص" ومربع حوار "مجلد البحث الجديد".

7. انقر بزر الماوس الأيمن فوق مجلد البحث الجديد الذي قمت بإنشائه الآن ، ثم حدد عقارات من قائمة النقر بزر الماوس الأيمن. انظر لقطة الشاشة:

8. في مربع الحوار التالي ، تحقق من إظهار العدد الإجمالي للعناصر الخيار ، ثم انقر فوق OK زر. انظر لقطة الشاشة:

من الآن فصاعدًا ، سيتم حفظ نسخ رسائل البريد الإلكتروني الواردة في مجلد البحث هذا يوميًا. إذا اقترب يوم جديد ، فسيقوم مجلد البحث تلقائيًا بإزالة جميع الرسائل القديمة والبدء في حساب رسائل البريد الإلكتروني الخاصة بالأيام الجديدة.

ملاحظات: يمكن لهذه الطريقة فقط حساب العدد الإجمالي لرسائل البريد الإلكتروني المستلمة اليوم في صندوق الوارد لحساب بريد إلكتروني واحد.


احسب العدد الإجمالي لرسائل البريد الإلكتروني الواردة في تاريخ معين باستخدام VBA

إلى جانب الطريقة المذكورة أعلاه ، يمكنك استخدام رمز VBA لحساب إجمالي رسائل البريد الإلكتروني في تاريخ معين في Outlook. الرجاء القيام بما يلي.

1. حدد المجلد الذي تريد حساب إجمالي رسائل البريد الإلكتروني الواردة يوميًا ، ثم افتح ملف ميكروسوفت فيسوال باسيك للتطبيقات عن طريق الضغط قديم + F11.

2. ثم الرجاء إدراج > وحدة لإدراج وحدة نمطية جديدة ، ثم لصق رمز VBA أدناه.

فبا: عد إجمالي رسائل البريد الإلكتروني في اليوم

Sub Countemailsperday()
    Dim objOutlook As Object, objnSpace As Object, objFolder As MAPIFolder
    Dim EmailCount As Integer
    Dim oDate As String
    
    oDate = InputBox("Type the date for count (format YYYY-m-d")
    Set objOutlook = CreateObject("Outlook.Application")
    Set objnSpace = objOutlook.GetNamespace("MAPI")
        On Error Resume Next
        Set objFolder = Application.ActiveExplorer.CurrentFolder
        If Err.Number <> 0 Then
        Err.Clear
        MsgBox "No such folder."
        Exit Sub
        End If
    EmailCount = objFolder.Items.Count
    MsgBox "Number of emails in the folder: " & EmailCount, , "email count"
    Dim ssitem As MailItem
    Dim dateStr As String
    Dim myItems As Outlook.Items
    Dim dict As Object
    Dim msg As String
    Set dict = CreateObject("Scripting.Dictionary")
    Set myItems = objFolder.Items
    myItems.SetColumns ("ReceivedTime")
    ' Determine date of each message:
    For Each myItem In myItems
        dateStr = GetDate(myItem.ReceivedTime)
        If dateStr = oDate Then
            If Not dict.Exists(dateStr) Then
                dict(dateStr) = 0
            End If
            dict(dateStr) = CLng(dict(dateStr)) + 1
        End If
    Next myItem
    ' Output counts per day:
    msg = ""
    For Each o In dict.Keys
        msg = msg & o & ": " & dict(o) & " items" & vbCrLf
    Next
    MsgBox msg
    Set objFolder = Nothing
    Set objnSpace = Nothing
    Set objOutlook = Nothing
End Sub
Function GetDate(dt As Date) As String
    GetDate = Year(dt) & "-" & Month(dt) & "-" & Day(dt)
End Function

3. بعد لصق رمز VBA ، الرجاء النقر فوق يجري .

4. ثم أدخل التاريخ المحدد الذي تريد حساب إجمالي رسائل البريد الإلكتروني الواردة في مربع الحوار المنبثق ، ثم انقر فوق OK. انظر لقطة الشاشة:

5. يطالب مربع حوار بإظهار العدد الإجمالي لرسائل البريد الإلكتروني في المجلد المحدد ، يرجى النقر فوق OK زر. وفي مربع الحوار المنبثق الثاني ، ستحصل على العدد الإجمالي لرسائل البريد الإلكتروني المستلمة اليوم. انظر لقطات الشاشة:

الملاحظات:
(1) يمكن لـ VBA هذا فقط حساب العدد الإجمالي لجميع رسائل البريد الإلكتروني المستلمة في التاريخ المحدد في المجلد المحدد ؛
(2) يعمل رمز VBA بشكل جيد في Outlook 2010 و 2013 و 2016.


حساب العدد الإجمالي لرسائل البريد الإلكتروني الواردة يوميًا باستخدام Kutools for Outlook

إذا كان لديك Kutools for Outlook مثبتًا ، فيمكنك تطبيق ميزة الإحصائيات الخاصة به لحساب إجمالي عدد رسائل البريد الإلكتروني المستلمة يوميًا في الشهر بسهولة. الرجاء القيام بما يلي:

كوتولس لتوقعات: مجموعة أدوات Outlook النهائية التي تحتوي على أكثر من 100 أداة سهلة الاستخدام. جربه مجانًا لمدة 60 يومًا، بدون قيود، ولا تقلق!   اقرأ أكثر...   ابدأ النسخة التجريبية المجانية الآن!

1. من فضلك اضغط كوتولس بلس > إحصائيات. انظر لقطة الشاشة:

2. الآن يظهر مربع حوار الإحصائيات ، يرجى تحديد المجلدات المحددة التي ستحسب فيها رسائل البريد الإلكتروني ، وحدد نطاق التاريخ الذي ستحسب فيه رسائل البريد الإلكترونيو انقر على OK زر. انظر لقطة الشاشة:

3. في مربع الحوار الإحصائي الثاني ، انتقل إلى أيام الشهر علامة التبويب أو ايام الاسبوع علامة التبويب ، يمكنك عرض العدد الإجمالي لرسائل البريد الإلكتروني المستلمة في كل تاريخ. انظر لقطة الشاشة:
راجع للشغل ، يمكنك أيضًا الحصول على العدد الإجمالي لرسائل البريد الإلكتروني المستلمة اليوم / أمس في جميع مجلدات صندوق الوارد لجميع حسابات البريد الإلكتروني على نبذة عامة علامة التبويب.


العرض التوضيحي: عد إجمالي عدد رسائل البريد الإلكتروني الواردة يوميًا باستخدام Kutools for Outlook


معلومه- سرية: في هذا الفيديو، كوتولس تمت إضافة علامة التبويب بواسطة كوتولس لتوقعات. إذا كنت في حاجة إليها ، الرجاء الضغط هنا للحصول على نسخة تجريبية مجانية لمدة 60 يومًا دون قيود!


مقالات ذات صلة:


أفضل أدوات إنتاجية المكتب

كوتولس لتوقعات - أكثر من 100 ميزة قوية لتعزيز توقعاتك

🤖 مساعد بريد الذكاء الاصطناعي: رسائل بريد إلكتروني احترافية فورية مع سحر الذكاء الاصطناعي - بنقرة واحدة للردود العبقرية، والنغمة المثالية، وإتقان متعدد اللغات. تحويل البريد الإلكتروني دون عناء! ...

📧 أتمتة البريد الإلكتروني: خارج المكتب (متوفر لـ POP وIMAP)  /  جدولة إرسال رسائل البريد الإلكتروني  /  نسخة تلقائية/نسخة مخفية الوجهة حسب القواعد عند إرسال البريد الإلكتروني  /  إعادة التوجيه التلقائي (القواعد المتقدمة)   /  إضافة تحية تلقائية   /  تقسيم رسائل البريد الإلكتروني متعددة المستلمين تلقائيًا إلى رسائل فردية 

📨 إدارة البريد الإلكتروني: استدعاء رسائل البريد الإلكتروني بسهولة  /  حظر رسائل البريد الإلكتروني الاحتيالية حسب الموضوعات والآخرين  /  حذف رسائل البريد الإلكتروني المكررة  /  المزيد من خيارات البحث  /  توحيد المجلدات 

📁 المرفقات بروحفظ دفعة  /  فصل دفعة  /  ضغط دفعة  /  حفظ تلقائي   /  فصل تلقائي  /  ضغط تلقائي 

؟؟؟؟ واجهة ماجيك: 😊 المزيد من الرموز التعبيرية الجميلة والرائعة   /  عزز إنتاجية Outlook الخاص بك باستخدام طرق العرض المبوبة  /  تصغير Outlook بدلاً من الإغلاق 

؟؟؟؟ بنقرة واحدة عجائب: الرد على الكل بالمرفقات الواردة  /   رسائل البريد الإلكتروني لمكافحة التصيد  /  🕘إظهار المنطقة الزمنية للمرسل 

👩🏼‍🤝‍👩🏻 جهات الاتصال والتقويم: دفعة إضافة جهات الاتصال من رسائل البريد الإلكتروني المحددة  /  تقسيم مجموعة اتصال إلى مجموعات فردية  /  إزالة تذكير عيد ميلاد 

على مدى ميزات 100 في انتظار الاستكشاف الخاص بك! انقر هنا لاكتشاف المزيد.

 

 

Comments (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Is there a way to add the SenderName details too? Based on the above code, it counts emails by date. I was looking to count emails by sender and date.
This comment was minimized by the moderator on the site
can you do a date range? and add folders?
This comment was minimized by the moderator on the site
Hi Laura,
You can filter emails by the date range (https://www.extendoffice.com/documents/outlook/1412-outlook-search-date-range.html), and then get the total number of search results at the bottom of Outlook Navigation Pane.
This comment was minimized by the moderator on the site
will this (VBA) works under Outlook 365 ?
This comment was minimized by the moderator on the site
Hi Artur,
This VBA works well in Outlook 365 desktop program.
This comment was minimized by the moderator on the site
guys i have tried this code just now but it is not working can anyone help me . i want to count the num of email i received in my oracle folder .
This comment was minimized by the moderator on the site
Hi this vba script is most appreciated, Can anyone help me to retrieve the count from specific folder with specific time, Ex: Count from sent items from dd/mm/yyyy mm:hh till dd/mm/yyyy mm:hh
This comment was minimized by the moderator on the site
Did you find a resolution to this?
This comment was minimized by the moderator on the site
Hi guys, any idea how to make this work for a period o time? I mean, selecting a range date (from-to) and getting the result per day e.g inpunt range from June 1st to june 6th: 6/1 total 14 6/2 total 24 6/3 total 12 and so on... thanks in advance
This comment was minimized by the moderator on the site
in my case i was able to figure it out by doing it manually. like you can count it per month or per year.
if you will count if per month, just delete the day in the formula

e.g:
Function GetDate(dt As Date) As String
GetDate = Year(dt) & "-" & Month(dt)
End Function


per year:
Function GetDate(dt As Date) As String
GetDate = Year(dt)
End Function
This comment was minimized by the moderator on the site
For me the last window worked when I set both dates into the same format. I chnaged the code into this me (Ru date/time format in Windows, US - in Outlook): 1) oDate = Date 2) ' Determine date of each message: For Each MyItem In myItems dateStr = DateValue(MyItem.ReceivedTime) 3) GetDate = Day(dt) & "." & Month(dt) & "." & Year(dt)
This comment was minimized by the moderator on the site
Hi , Very useful code , but like above it does not count per day for me and last message box is empty , can anyone fix this please
This comment was minimized by the moderator on the site
VBA instuctions to be able to create a counter for emails recieves last week
This comment was minimized by the moderator on the site
very thanks i solved all what i need, very thanks again great effort
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations