¿Cómo exportar el texto del cuerpo de un correo electrónico de Outlook a una hoja de cálculo de Excel?
Exportar el texto del cuerpo de un correo electrónico desde Outlook a una hoja de cálculo de Excel puede ser útil para realizar un seguimiento de la información o analizar datos de los correos electrónicos. Este tutorial lo guiará a través de dos métodos: usar VBA (Visual Basic for Applications) para exportaciones manuales y la función Guardar correos electrónicos como otros archivos de Kutools para Outlook, que simplifica el proceso.
Exportación del texto del cuerpo del correo electrónico a Excel con VBA
Exportación masiva del texto del cuerpo del correo electrónico a Excel con Kutools para Outlook
Permite exportar múltiples mensajes y guardarlos en formato PDF, Excel, HTML u otros formatos de archivo.
Exportación del texto del cuerpo del correo electrónico a Excel con VBA
Usar VBA es un método manual para exportar el texto del cuerpo del correo electrónico a una hoja de cálculo de Excel. Siga estos pasos:
1. Abra el correo electrónico, seleccione el cuerpo del correo que desea exportar a la hoja de cálculo de Excel y luego presione las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en Insertar > Módulo. Luego copie el siguiente código VBA en la ventana de Código.
Código VBA: exportar el texto del cuerpo del correo electrónico de Outlook a una hoja de cálculo de Excel
Sub ExportToExcel()
Dim xExcel As Excel.Application
Dim xWb As Workbook
Dim xWs As Worksheet
Dim xInspector As Inspector
Dim xItem As Object
Dim xMailItem As MailItem
Dim xDoc As Document
Dim xShell As Object
Dim xFilePath As String
On Error Resume Next
Set xShell = CreateObject("Shell.Application")
Set xFolder = xShell.BrowseForFolder(0, "Select a Folder:", 0, 0)
If TypeName(xFolder) = "Nothing" Then Exit Sub
Set xFolderItem = xFolder.Self
xFilePath = xFolderItem.Path & "\"
Set xItem = Outlook.Application.ActiveExplorer.Selection.item(1)
If xItem.Class <> olMail Then Exit Sub
Set xMailItem = xItem
Set xInspector = xMailItem.GetInspector
Set xDoc = xInspector.WordEditor
xDoc.Application.Selection.Range.Copy
xInspector.Close olDiscard
Set xExcel = New Excel.Application
Set xWb = xExcel.Workbooks.Add
Set xWs = xWb.Sheets.item(1)
xExcel.Visible = False
xWs.Activate
xWs.Paste
xWs.SaveAs xFilePath & "Email body.xlsx"
xWb.Close True
xExcel.Quit
Set xWs = Nothing
Set xWb = Nothing
Set xExcel = Nothing
End SubNota: En el código, “Email body.xlsx” es el nombre del libro que creará con el texto seleccionado del cuerpo del correo electrónico. Puede cambiarlo según sea necesario.
3. Haga clic en Herramientas > Referencias. Luego marque ambas casillas de la Biblioteca de Objetos de Microsoft Excel y la Biblioteca de Objetos de Microsoft Word en el cuadro de diálogo Referencias – Proyecto. Ver captura de pantalla:
4. Luego aparecerá un cuadro de diálogo Examinar Carpeta, por favor seleccione una carpeta para guardar el libro y haga clic en el botón Aceptar.
Ahora se crea y guarda un libro llamado “Email body” en una carpeta específica. Al abrir el libro, podrá ver que el texto seleccionado del cuerpo del correo electrónico se ha exportado a la Hoja1 del libro.
Asistente de Correo AI en Outlook: Respuestas más Inteligentes, Comunicación más Clara (¡magia con un solo clic!) GRATIS
Simplifica tus tareas diarias en Outlook con el Asistente de Correo AI de Kutools para Outlook. Esta poderosa herramienta aprende de tus correos electrónicos anteriores para ofrecerte respuestas inteligentes y precisas, optimizar el contenido de tus correos y ayudarte a redactar y perfeccionar mensajes sin esfuerzo.
Esta función admite:
- Respuestas Inteligentes: Obtén respuestas elaboradas a partir de tus conversaciones pasadas, personalizadas, precisas y listas para usar.
- Contenido Mejorado: Refina automáticamente el texto de tus correos electrónicos para mayor claridad e impacto.
- Redacción sin Esfuerzo: Solo proporciona palabras clave y deja que la IA haga el resto, con múltiples estilos de escritura.
- Extensiones Inteligentes: Amplía tus ideas con sugerencias contextualizadas.
- Resúmenes: Obtén resúmenes concisos de correos electrónicos largos al instante.
- Alcance Global: Traduce tus correos electrónicos a cualquier idioma fácilmente.
Esta función admite:
- Respuestas inteligentes de correo electrónico
- Contenido optimizado
- Borradores basados en palabras clave
- Extensión inteligente de contenido
- Resumen de correos electrónicos
- Traducción multilingüe
¡Lo mejor de todo es que esta función es completamente gratis para siempre! No esperes más, ¡descarga ahora el Asistente de Correo AI y disfruta!
Exportación masiva del texto del cuerpo del correo electrónico a Excel con Kutools para Outlook
Si prefiere un método fácil de usar y que ahorre tiempo, Kutools para Outlook ofrece una función Guardar correos electrónicos como otros archivos que le permite guardar el texto del cuerpo del correo electrónico y otros detalles en masa.
Después de instalar Kutools para Outlook, siga los siguientes pasos:
Paso 1. Seleccione los mensajes de los cuales desea exportar sus textos del cuerpo.
Paso 2. Haga clic en Kutools > Procesamiento Masivo > Guardar correos electrónicos seleccionados en varios formatos como PDF.
Paso 3. En el cuadro de diálogo Guardar correos electrónicos como otros archivos,
Seleccione una carpeta para colocar los archivos exportados.
Marque Formato Excel.
Marque Solo cuerpo.
Haga clic en Aceptar.
Ahora solo los textos del cuerpo de los mensajes seleccionados se guardan como archivos de Excel separados.
Las mejores herramientas de productividad para Office
Últimas noticias: ¡Kutools para Outlook lanza su versión gratuita!
Descubre la nueva versión GRATUITA de Kutools para Outlook con más de70 funciones increíbles, ¡para que la disfrutes PARA SIEMPRE! ¡Haz clic para descargar ahora!
📧 Automatización de Email: Respuesta automática (Disponible para POP e IMAP) / Programar envío de correos / CC/BCC automático por regla al enviar correo / Reenvío automático (Regla avanzada) / Agregar saludo automáticamente / Dividir automáticamente emails con múltiples destinatarios en mensajes individuales...
📨 Gestión de Email: Recuperar correo electrónico / Bloquear correos fraudulentos por asunto y otros criterios / Eliminar correos electrónicos duplicados / Búsqueda Avanzada / Organizar carpetas...
📁 Adjuntos Pro: Guardar en lote / Desanexar en lote / Comprimir en lote / Guardar automáticamente / Desconectar automáticamente / Auto Comprimir...
🌟 Magia en la interfaz: 😊Más emojis bonitos y modernos / Avisos cuando llegan correos importantes / Minimiza Outlook en vez de cerrarlo...
👍 Funciones de un solo clic: Responder a Todos con Adjuntos / Correos electrónicos anti-phishing / 🕘Mostrar la zona horaria del remitente...
👩🏼🤝👩🏻 Contactos y Calendario: Agregar contactos en lote desde correos seleccionados / Dividir un grupo de contactos en grupos individuales / Eliminar recordatorio de cumpleaños...
