¿Cómo exportar correos electrónicos de Outlook a Excel automáticamente?

Author: Xiaoyang Last Modified: 2025-08-06

Normalmente, puede exportar correos electrónicos de Outlook a Excel utilizando la función Importar/Exportar. Sin embargo, si necesita exportar automáticamente los correos entrantes a un archivo de Excel tan pronto como lleguen, Outlook no proporciona una solución integrada. Este artículo presenta dos métodos para lograr esto:

Exportar automáticamente nuevos correos electrónicos entrantes desde la Bandeja de entrada a Excel usando VBA (Manual y tedioso)

Exportar rápidamente todos los correos electrónicos de una carpeta seleccionada a un informe de Excel con Kutools para Outlook 👍 (Rápido y fácil)

Exportar automáticamente nuevos correos electrónicos entrantes desde la Bandeja de entrada a Excel usando VBA

Si necesita una manera automatizada de exportar nuevos correos electrónicos a Excel, puede usar el siguiente código VBA. Este método monitorea la carpeta Bandeja de entrada y exporta los detalles de los nuevos correos electrónicos a un archivo de Excel tan pronto como lleguen.

Paso 1: Preparar el archivo de Excel

Antes de ejecutar el código VBA, configure un libro de Excel para almacenar los datos de correo electrónico exportados. En la primera fila, incluya los siguientes encabezados de columna: No., Nombre del remitente, Dirección de correo electrónico del remitente, Asunto y Hora de recepción.

doc auto export emails to excel 1

Paso 2: Abrir el Editor de VBA en Outlook

1. Presione Alt + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones.

2. En el panel Proyecto1 (VbaProject.OTM), expanda Objetos de Microsoft Outlook y haga doble clic en ThisOutlookSession.

Paso 3: Insertar el código VBA

Copie y pegue el siguiente código VBA en el módulo:

Public WithEvents GMailItems As Outlook.Items
Private Sub Application_Startup()
    Set GMailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub GMailItems_ItemAdd(ByVal Item As Object)
    Dim xMailItem As Outlook.MailItem
    Dim xExcelFile As String
    Dim xExcelApp As Excel.Application
    Dim xWb As Excel.Workbook
    Dim xWs As Excel.Worksheet
    Dim xNextEmptyRow As Integer
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xMailItem = Item
    ' Update this path with your actual Excel file path  
    xExcelFile = "C:\Users\DT168\Desktop\split document\kto-data.xlsx"
    If IsWorkBookOpen(xExcelFile) = True Then
        Set xExcelApp = GetObject(, "Excel.Application")
        Set xWb = GetObject(xExcelFile)
        If Not xWb Is Nothing Then xWb.Close True
    Else
        Set xExcelApp = New Excel.Application
    End If
    Set xWb = xExcelApp.Workbooks.Open(xExcelFile)
    Set xWs = xWb.Sheets(1)
    xNextEmptyRow = xWs.Range("B" & xWs.Rows.Count).End(xlUp).Row + 1
    With xWs
        .Cells(xNextEmptyRow, 1) = xNextEmptyRow - 1
        .Cells(xNextEmptyRow, 2) = xMailItem.SenderName
        .Cells(xNextEmptyRow, 3) = xMailItem.SenderEmailAddress
        .Cells(xNextEmptyRow, 4) = xMailItem.Subject
        .Cells(xNextEmptyRow, 5) = xMailItem.ReceivedTime
    End With
    xWs.Columns("A:E").AutoFit
    xWb.Save
End Sub
Function IsWorkBookOpen(FileName As String)
    Dim xFreeFile As Long, xErrNo As Long
    On Error Resume Next
    xFreeFile = FreeFile()
    Open FileName For Input Lock Read As #xFreeFile
    Close xFreeFile
    xErrNo = Err
    On Error GoTo 0
    Select Case xErrNo
        Case 0: IsWorkBookOpen = False
        Case 70: IsWorkBookOpen = True
        Case Else: Error xErrNo
    End Select
End Function

doc auto export emails to excel 2

⚡ Consejo: En el código anterior, C:\Users\DT168\Desktop\split document\kto-data.xlsx representa la ruta y el nombre del archivo del libro de Excel donde se almacenarán los datos de correo electrónico. Asegúrese de modificar esta ruta para que coincida con la ubicación y el nombre de archivo reales que desea utilizar.

Paso 4: Habilitar la Biblioteca de Objetos de Microsoft Excel

1. En la ventana Microsoft Visual Basic para Aplicaciones, haga clic en Herramientas > Referencias.

2. En el cuadro de diálogo Referencias - Proyecto1, desplácese hacia abajo y marque la opción Biblioteca de Objetos de Microsoft Excel.

3. Haga clic en Aceptar para aplicar los cambios.

doc auto export emails to excel 3

Paso 5: Guardar y reiniciar Outlook

1. Guarde el código VBA y cierre el editor.

2. Reinicie Outlook para que los cambios surtan efecto.

Resultado:

A partir de ahora, cada nuevo correo electrónico que llegue a la Bandeja de entrada se exportará automáticamente al libro de Excel especificado.

doc auto export emails to excel 4

Limitaciones del método VBA:

❌ Funciona solo para una Bandeja de entrada: Este método solo rastrea nuevos correos electrónicos en la Bandeja de entrada predeterminada. Si tiene varias cuentas, no capturará correos electrónicos de otras cuentas.
❌ Requiere Outlook habilitado para macros: Las macros VBA deben estar habilitadas para que esto funcione, lo cual puede plantear preocupaciones de seguridad.
❌ Dependencia de la ruta del archivo: Si el archivo de Excel se mueve o elimina, el código fallará.
❌ Configuración manual requerida: Los usuarios deben ingresar manualmente la ruta del archivo de Excel y configurar el entorno VBA.

📊 Estadísticas de correo electrónico más inteligentes con Kutools

Realice un seguimiento y análisis sencillo de su actividad de correo electrónico con la función Estadísticas de Kutools para Outlook. ¡Ahora cuente los correos electrónicos recibidos por día, semana o mes, y vea los resultados en gráficos claros y profesionales! Optimice su gestión de correo electrónico y obtenga valiosas perspectivas con solo unos clics.

Descargue Kutools para Outlook ahora

Exportar rápidamente todos los correos electrónicos de una carpeta seleccionada a un informe de Excel con Kutools para Outlook 👍

Si necesita una manera sin complicaciones de exportar correos electrónicos de cualquier carpeta (Bandeja de entrada, Elementos enviados, Carpetas personalizadas) sin usar VBA, la función Informe rápido de Kutools para Outlook proporciona una solución simple.

¡Desbloquea la máxima eficiencia en el correo electrónico con Kutools para Outlook! Accede a 70 funciones poderosas completamente gratis, para siempre. ¡Descarga la versión gratuita ahora!

Paso 1: Seleccione la carpeta y habilite la función Informe rápido

1. Abra Outlook y navegue hasta la carpeta que desea exportar (Bandeja de entrada, Buzón de salida, Elementos enviados, etc.).

2. Haga clic en Kutools Plus > Informe > Informe rápido.

Paso 2: Elija la ubicación de guardado

1. En la ventana Guardar informe, elija una ubicación e ingrese un nombre de archivo para la exportación.

2. Haga clic en Guardar.

doc auto export emails to excel 7

Paso 3: Abra el informe exportado

Aparecerá un mensaje de confirmación. Haga clic en Sí para abrir el archivo exportado.

doc auto export emails to excel 8

Resultado:

Todos los correos electrónicos de la carpeta seleccionada se exportarán a un archivo XML compatible con Excel, mostrando el remitente, asunto, hora de recepción y más.

doc auto export emails to excel 9

Ventajas del método Kutools para Outlook:

✅ Funciona con cualquier carpeta: Exporte correos electrónicos de la Bandeja de entrada, Elementos enviados, Buzón de salida o carpetas personalizadas.
✅ No se requiere VBA: No es necesario habilitar macros ni editar código.
✅ Soporte multi-cuenta: Exporte correos electrónicos de múltiples cuentas de correo electrónico sin esfuerzo.
✅ Ahorro de tiempo: Con unos pocos clics se genera un informe instantáneo.
✅ Exportación de datos personalizable: Elija qué detalles (asunto, remitente, fecha, etc.) incluir.

Nota:Para aplicar la utilidad Informe rápido de Kutools para Outlook, primero debe descargar e instalar Kutools para Outlook.

¿Qué método debería usar?

Aquí hay una comparación de los dos métodos para ayudarlo a decidir cuál es el más adecuado para sus necesidades:

Método	Ideal para	Facilidad de uso	Eficiencia
Usar código VBA (Automatizado pero complejo)	Exportar automáticamente nuevos correos electrónicos de la Bandeja de entrada	⭐⭐	⭐⭐⭐⭐
Usar Kutools para Outlook (Simple y flexible)	Exportar rápidamente todos los correos electrónicos de una carpeta seleccionada	⭐⭐⭐⭐⭐	⭐⭐⭐⭐⭐

¡Al seleccionar el método correcto, puede exportar eficientemente los correos electrónicos de Outlook a Excel según las necesidades de su flujo de trabajo!