Как подсчитать общее количество входящих писем за день в Outlook?

На самом деле, довольно легко найти все письма, пришедшие сегодня, в папке "Входящие", во всех папках учетной записи электронной почты или во всех папках всех учетных записей электронной почты в Outlook, а затем подсчитать общее количество результатов поиска. Пожалуйста, выполните следующие действия:

В представлении "Почта" (1) выберите папку "Входящие" одной из учетных записей электронной почты, где вы хотите подсчитать входящие письма за сегодня; (2) введите критерий поиска "получено:Сегодня" в поле "Мгновенный поиск", а затем (3) укажите область поиска в группе "Область" на вкладке "Поиск". См. скриншот:

И теперь общее количество всех результатов поиска, другими словами, общее количество входящих писем за сегодня отображается в нижнем левом углу Outlook, как показано на скриншоте ниже.

Одним щелчком подсчитайте количество выбранных писем в Outlook

Легко получить общее количество всех элементов или количество непрочитанных элементов в папке Outlook. Но как быстро узнать количество выбранных элементов в папке в Outlook? Здесь рекомендуется использовать Kutools для Outlook, Количество выбранных элементов который может быстро показать количество выбранных элементов всего одним щелчком!

Этот метод поможет вам создать поисковую папку, которая автоматически собирает все письма, полученные сегодня, и затем вы сможете получить общее количество этих писем, изменив свойства поисковой папки. Пожалуйста, выполните следующие действия:

1. Выберите учетную запись электронной почты, в которой вы хотите создать поисковую папку, на панели навигации и нажмите "Папка" > "Новая поисковая папка". См. скриншот:

2. В диалоговом окне "Новая поисковая папка" выберите опцию "Создать пользовательскую поисковую папку" и нажмите кнопку "Выбрать". См. скриншот:

3. Теперь появится диалоговое окно "Пользовательская поисковая папка". Пожалуйста, назовите новую поисковую папку в поле "Имя".

4. Далее нажмите кнопку "Критерии" в диалоговом окне "Пользовательская поисковая папка". Теперь в диалоговом окне "Критерии поисковой папки" (1) перейдите на вкладку "Сообщение", (2) выберите "получено" из выпадающего списка "Время", (3) укажите "Сегодня" из следующего выпадающего списка, а затем (4) нажмите кнопку "OK". См. скриншот:

5. Теперь вернитесь в диалоговое окно "Пользовательская поисковая папка", пожалуйста, нажмите кнопку "Обзор". А затем в диалоговом окне "Выбор папок" (1) отметьте только "Входящие" в списке "Папки", отметьте опцию "Поиск подпапок" и нажмите кнопку "OK". См. скриншот:

6. Затем последовательно нажмите кнопки "OK", чтобы закрыть диалоговое окно "Пользовательская поисковая папка" и диалоговое окно "Новая поисковая папка".

7. Щелкните правой кнопкой мыши созданную вами новую поисковую папку, а затем выберите "Свойства" из контекстного меню. См. скриншот:

8. В следующем диалоговом окне отметьте опцию "Показывать общее количество элементов", а затем нажмите кнопку "OK". См. скриншот:

С этого момента копии входящих сообщений будут сохраняться в эту поисковую папку каждый день. Если наступает новый день, поисковая папка автоматически удалит все старые сообщения и начнет подсчет новых писем за день.

Примечание: Этот метод может подсчитывать только общее количество писем, полученных сегодня, в папке "Входящие" одной учетной записи электронной почты.

Помимо вышеупомянутого метода, вы можете использовать код VBA для подсчета общего количества писем на определенную дату в Outlook. Пожалуйста, выполните следующие действия.

1. Выберите папку, в которой вы хотите подсчитать общее количество входящих писем за день, а затем откройте "Microsoft Visual Basic for Applications", нажав "Alt" + "F11".

2. Затем нажмите "Вставить" > "Модуль", чтобы вставить новый модуль, и затем вставьте приведенный ниже код VBA в него.

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 для Outlook, вы можете применить его функцию статистики, чтобы легко подсчитать общее количество писем, полученных за день в течение месяца. Пожалуйста, выполните следующие действия:

1. Пожалуйста, нажмите "Kutools Plus" > "Статистика". См. скриншот:

2. Теперь появится диалоговое окно "Статистика", пожалуйста, выберите указанные папки, в которых вы будете подсчитывать письма, укажите диапазон дат, в котором вы будете подсчитывать письма, и нажмите кнопку "OK". См. скриншот:

3. Во втором диалоговом окне "Статистика" перейдите на вкладку "Дни месяца" или "Дни недели", вы можете просмотреть общее количество писем, полученных в каждую дату. См. скриншот:
Кстати, вы также можете получить общее количество писем, полученных сегодня/вчера, во всех папках "Входящие" всех учетных записей электронной почты на вкладке "Сводка".