¿Cómo contar el número total de correos electrónicos entrantes por día en Outlook?

En realidad, es bastante fácil buscar todos los correos electrónicos entrantes hoy en la carpeta "Bandeja de entrada", en todas las carpetas de una cuenta de correo electrónico o en todas las carpetas de todas las cuentas de correo electrónico en Outlook, y luego contar el número total de los resultados de búsqueda. Por favor, sigue estos pasos:

En la vista de "Correo", (1) selecciona la carpeta "Bandeja de entrada" de una cuenta de correo electrónico donde contarás los correos electrónicos entrantes hoy; (2) escribe el criterio de búsqueda "recibido:Hoy" en el cuadro de "Búsqueda Instantánea", y luego (3) especifica un ámbito de búsqueda en el grupo "Ámbito" en la pestaña "Buscar". Ver captura de pantalla:

Y ahora el número total de todos los resultados de búsqueda, en otras palabras, el número total de correos electrónicos entrantes hoy se muestra en la esquina inferior izquierda de Outlook como se muestra en la siguiente captura de pantalla.

Un clic para contar el número de correos electrónicos seleccionados en Outlook

Es fácil obtener el número total de todos los elementos o el número de elementos no leídos en una carpeta de Outlook. Pero, ¿cómo podrías obtener rápidamente el número de elementos seleccionados en una carpeta en Outlook? Aquí, Kutools para Outlook's Conteo de Elementos Seleccionados se recomienda, ya que puede mostrar rápidamente el número de elementos seleccionados con solo un clic!

Este método te guiará para crear una carpeta de búsqueda que automáticamente recolecte todos los correos electrónicos recibidos hoy, y luego puedes obtener el número total de estos correos cambiando las propiedades de la carpeta de búsqueda. Por favor, sigue estos pasos:

1. Selecciona la cuenta de correo electrónico dentro de la cual crearás una carpeta de búsqueda en el Panel de Navegación, y haz clic en "Carpeta" > "Nueva Carpeta de Búsqueda". Ver captura de pantalla:

2. En el cuadro de diálogo "Nueva Carpeta de Búsqueda", selecciona la opción "Crear una Carpeta de Búsqueda Personalizada", y haz clic en el botón "Elegir". Ver captura de pantalla:

3. Ahora aparece el cuadro de diálogo "Carpeta de Búsqueda Personalizada". Por favor, nombra la nueva carpeta de búsqueda en el cuadro "Nombre".

4. Continúa haciendo clic en el botón "Criterios" en la "Carpeta de Búsqueda Personalizada". Ahora, en el cuadro de diálogo "Criterios de la Carpeta de Búsqueda", (1) haz clic en la pestaña "Mensaje", (2) selecciona "recibido" desde la lista desplegable "Hora", (3) especifica "Hoy" en la siguiente lista desplegable, y luego (4) haz clic en el botón "Aceptar". Ver captura de pantalla:

5. Ahora regresa al cuadro de diálogo "Carpeta de Búsqueda Personalizada", haz clic en el botón "Examinar". Luego, en el cuadro de diálogo "Seleccionar Carpeta(s)", (1) marca solo "Bandeja de entrada" en el cuadro de lista "Carpetas", marca la opción "Buscar Subcarpetas", y haz clic en el botón "Aceptar". Ver captura de pantalla:

6. Luego haz clic en los botones "Aceptar" sucesivamente para cerrar el cuadro de diálogo "Carpeta de Búsqueda Personalizada" y el cuadro de diálogo "Nueva Carpeta de Búsqueda".

7. Haz clic derecho en la nueva carpeta de búsqueda que acabas de crear, y luego selecciona "Propiedades" desde el menú contextual. Ver captura de pantalla:

8. En el siguiente cuadro de diálogo, marca la opción "Mostrar números totales de elementos", y luego haz clic en el botón "Aceptar". Ver captura de pantalla:

A partir de ahora, las copias de los mensajes de correo entrantes se guardarán en esta carpeta de búsqueda diariamente. Si llega un nuevo día, la carpeta de búsqueda eliminará automáticamente todos los mensajes antiguos y comenzará a contar los mensajes de correo del nuevo día.

Nota: Este método solo puede contar el número total de correos electrónicos recibidos hoy en la Bandeja de entrada de una cuenta de correo electrónico.

Además del método anterior, puedes usar código VBA para contar correos electrónicos totales en una fecha específica en Outlook. Por favor, sigue estos pasos.

1. Selecciona la carpeta donde deseas contar los correos electrónicos entrantes totales por día, y luego abre "Microsoft Visual Basic para Aplicaciones" presionando "Alt" + "F11".

2. Luego haz clic en "Insertar" > "Módulo" para insertar un nuevo módulo, y luego pega el siguiente código VBA en él.

VBA: Contar correos electrónicos totales por día

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. Después de pegar el código VBA, haz clic en el botón "Ejecutar".

4. Luego ingresa la fecha específica en la que deseas contar los correos electrónicos entrantes totales en el cuadro de diálogo emergente, y luego haz clic en "Aceptar". Ver captura de pantalla:

5. Un cuadro de diálogo muestra el número total de correos electrónicos en la carpeta seleccionada, haz clic en el botón "Aceptar". Y en el segundo cuadro de diálogo emergente, obtendrás el número total de correos electrónicos recibidos hoy. Ver capturas de pantalla:

Notas:
(1) Este VBA solo puede contar el número total de todos los correos electrónicos recibidos en la fecha especificada en la carpeta seleccionada.
(2) Este código VBA funciona bien en Outlook 2010, 2013 y 2016.

Si tienes Kutools para Outlook instalado, puedes aplicar su función Estadísticas para contar fácilmente el número total de correos electrónicos recibidos por día en un mes. Por favor, sigue estos pasos:

1. Haz clic en "Kutools Plus" > "Estadísticas". Ver captura de pantalla:

2. Ahora aparece el cuadro de diálogo Estadísticas, selecciona las carpetas especificadas donde contarás los correos electrónicos, especifica el rango de fechas en el que contarás los correos electrónicos, y haz clic en el botón "Aceptar". Ver captura de pantalla:

3. En el segundo cuadro de diálogo Estadísticas, ve a la pestaña "Días del Mes" o "Días de la Semana", puedes ver el número total de correos electrónicos recibidos en cada fecha. Ver captura de pantalla:
Por cierto, también puedes obtener el número total de correos electrónicos recibidos hoy/ayer en todas las carpetas de Bandeja de entrada de todas las cuentas de correo electrónico en la pestaña "Resumen".