Outlook: Cómo imprimir correos electrónicos sin imágenes

Author: Sun Last Modified: 2025-08-06

Generalmente, al imprimir un correo electrónico en Outlook, las imágenes también se imprimen. Pero a veces, solo deseas imprimir el texto sin las imágenes. Sin embargo, en Outlook no hay una función integrada que pueda hacer esto. Este tutorial proporciona un código VBA que imprimirá el correo electrónico sin imágenes a través de Word de inmediato. O si tu computadora no tiene impresora, el código VBA exportará primero el correo electrónico como un PDF sin imágenes, y luego podrás imprimir el PDF cuando la impresora esté disponible.

VBA para imprimir correos electrónicos sin imágenes

VBA para imprimir correos electrónicos sin imágenes

1. Selecciona un correo electrónico que desees imprimir solo con texto, luego presiona las teclas Alt + F11 para habilitar la ventana de Microsoft Visual Basic para Aplicaciones.

2. Haz clic en Insertar > Módulo para crear un nuevo módulo en blanco, luego copia y pega el siguiente código en el módulo.

VBA: exportar correo electrónico sin imágenes

Sub PrintWithoutImages()
'UpdatebyExtendoffice20220414
  Dim xMail As Outlook.MailItem
  Dim xFileName As String, xSubject As String
  Dim xWord As Word.Application
  Dim xWordDoc As Word.Document
  Dim xInlineShape As Word.InlineShape
  Dim InvalidArr
  On Error Resume Next
  If Application.ActiveWindow.Class = olInspector Then
    Set xMail = ActiveInspector.CurrentItem
  ElseIf Application.ActiveWindow.Class = olExplorer Then
    Set xMail = ActiveExplorer.Selection.Item(1)
  End If
  
  InvalidArr = Array("/", "\", "*", ":", Chr(34), "?", "<", ">", "|")
  xSubject = xMail.Subject
  For i = 0 To UBound(InvalidArr)
    xSubject = VBA.Replace(xSubject, InvalidArr(i), "")
  Next i
  
  xFileName = Environ("Temp") & "\" & xSubject & ".doc"
Debug.Print xFileName
  xMail.SaveAs xFileName, olDoc
  Set xWord = CreateObject("Word.Application")
  xWord.Visible = False
  Set xWordDoc = xWord.Documents.Open(xFileName)
  For Each xInlineShape In xWordDoc.InlineShapes
      xInlineShape.Delete
  Next
  xWordDoc.PrintOut
  xWordDoc.Close
  xWord.Quit
  Kill xFileName
End Sub

3. Haz clic en Herramientas > Referencias para abrir el cuadro de diálogo Referencias – Proyecto 1, marca la casilla de verificación de la Biblioteca de objetos de Microsoft Word 16.0. Haz clic en Aceptar.

steps on using vab to print email without images

4-1. Mantén el cursor dentro del código y presiona la tecla F5 o haz clic en el botón Ejecutar para ejecutar el código; luego, el correo electrónico sin imágenes se imprimirá de inmediato a través de Word. Pero si tu computadora no tiene una impresora, sigue el Paso 4.

4-2. Cuando tu computadora no tiene una impresora, después de presionar la tecla F5 o hacer clic en el botón Ejecutar para ejecutar el código, aparecerá un cuadro de diálogo para elegir una carpeta donde colocar el archivo PDF y nombrar el archivo PDF. Haz clic en Guardar.

steps on using vab to print email without images

Ahora el correo electrónico se ha exportado como un PDF sin imágenes. Abre el archivo PDF, haz clic derecho y selecciona Imprimir para imprimir el correo electrónico.

Consejo: Si deseas guardar en masa los correos electrónicos seleccionados como PDF (u otros formatos como Word, CSV, Excel, Txt, HTML) con imágenes, encabezados, cuerpos, CC, la función Guardado Masivo de Kutools para Outlook puede ayudarte, y solo requiere 3 pasos.

1. Selecciona los correos electrónicos.

2. Haz clic en Kutools > Guardado Masivo.

3. Elige una ubicación y marca los formatos de archivo que deseas, haz clic en Aceptar.

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!