How to count total number of incoming emails per day in Outlook?
Have you ever counted the total number of emails that you received per day? And are you fed up with counting them one by one manually without any efficient methods? In this tutorial, we provide you with two tricks for counting total emails per day in Outlook.
- Count total number of emails incoming today with Instant Search feature
- Count total number of emails incoming today with Search Folder feature
- Count total number of emails incoming on a certain date with VBA
- Count total number of emails incoming per day with Kutools for Outlook
Actually, it's quite easy to search all emails incoming today into the Inbox folder, all folders of an email account, or all folders of all email accounts in Outlook, and then count the total number of the search results. Please do as follows:
In the Mail view, (1) select the Inbox folder of one email account that you will count incoming emails today; (2) type the search criteria received:Today into the Instant Search box, and then (3) specify a search scope in the Scope group on the Search tab. See screenshot:
And now the total number of all search results, in other words the total number of emails incoming today displays at the bottom-left corner of Outlook as below screenshot shown.
This method will guide you to create a search folder which automatically collects all emails received today, and then you can get the total number of these emails with change the search folder's properties. Please do as follows:
1. Select the email account that you will create a search folder within on the Navigation Pane, and click Folder > New Search Folder. See screenshot:
2. In the New Search Folder dialog, select the Create a custom Search Folder option, and click the Choose button. See screenshot:
3. Now the Custom Search Folder dialog box comes out. Please name the new search folder in the Name box.
4. Go ahead to click the Criteria button in the Custom Search Folder. Now In the Search Folder Criteria dialog box, (1) click Message tab, (2) select received from the Time drop down list, (3) specify Today from the following drop down list, and then (4) click the OK button. See screenshot:
5. Now it returns to the Custom Search Folder dialog, please click Browse button. And then In the Select Folder(s) dialog box, (1) please only check Inbox in the Folders list box, check Search Subfolders option, and click the OK button. See screenshot:
6. And then click OK buttons successively to close the Custom Search Folder dialog box and New Search Folder dialog box.
7. Right click the new search folder you created just now, and then select Properties from the right-clicking menu. See screenshot:
8. In the following dialog, check the Show total numbers of items option, and then click the OK button. See screenshot:
From now on, the copies of the incoming email messages will be saved to this search folder per day. If a new day is coming, the search folder will automatically remove all the old messages and start counting the new days email messages.
Note: This method can only count the total number of emails received today in Inbox of one email account.
Besides the above method, you can use VBA code to count total emails on a certain date in Outlook. Please do as follows.
1. Select the folder that you want to count the total incoming emails per day, and then open the Microsoft Visual Basic for Applications by pressing Alt + F11.
2. Then please Insert > Module to insert a new module, and then paste below VBA code into it.
VBA: Count total emails per day
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. After pasting the VBA code, please click Run button.
4. Then enter the specified date you want to count the total incoming emails in the popping out dialog box, and then click OK. See screenshot:
5. A dialog box prompts to show the total number of emails in the selected folder, please click the OK button. And in the second popping out dialog box, you will get the total number of emails received today. See screenshots:
(1) This VBA can only count the total number of all email received on the specified date in the selected folder;
(2) This VBA code works well in Outlook 2010, 2013, and 2016.
If you have Kutools for Outlook installed, you can apply its Statistics feature to easily count the total numbers of emails received per day in a month. Please do as follows:
1. Please click Kutools Plus > Statistics. See screenshot:
2. Now the Statistics dialog box comes out, please select the specified folders you will count emails in, specify the date range you will count emails within, and click the OK button. See screenshot:
3. In the second Statistic dialog box, go to the Days of Month tab or Days of Week tab, you can view the total number of emails received on each date. See screenshot:
Btw, you can also get the total number of emails received today/yesterday in all Inbox folders of all email accounts on the Summary tab.
- Auto CC/BCC by rules when sending email; Auto Forward Multiple Emails by custom; Auto Reply without exchange server, and more automatic features...
- BCC Warning - show message when you try to reply all if your mail address is in the BCC list; Remind When Missing Attachments, and more remind features...
- Reply (All) With All Attachments in the mail conversation; Reply Many Emails in seconds; Auto Add Greeting when reply; Add Date into subject...
- Attachment Tools: Manage All Attachments in All Mails, Auto Detach, Compress All, Rename All, Save All... Quick Report, Count Selected Mails...
- Powerful Junk Emails by custom; Remove Duplicate Mails and Contacts... Enable you to do smarter, faster and better in Outlook.