Saltar al contenido principal

¿Cómo eliminar todas las imágenes del documento en Word?

Si desea eliminar todas las imágenes y mantener todo el formato sin cambios en un documento, ¿cómo puede hacerlo? Este tutorial le mostrará algunas cosas complicadas para eliminar todas las imágenes sin cambiar el formato del documento.

Elimine todas las imágenes del documento mediante la función Buscar y reemplazar
Elimine todas las imágenes del documento usando el código VBA
Elimine fácilmente todas las imágenes del documento con Kutools para Word


Elimine todas las imágenes del documento mediante la función Buscar y reemplazar

Buscar y reemplazar La función proporciona una forma sencilla de convertir o eliminar valores, por lo que también puede utilizarla para eliminar todas las imágenes del documento.

Paso 1: Click Inicio > Reemplaza para abrir el Buscar y reemplazar ventana;

Paso 2: en el Buscar y reemplazar ventana, haga clic en el Más botón para abrir más Buscar Opciones y luego haga clic en Especiales > Gráficoy finalmente haga clic en el reemplazar todo botón. Ver captura de pantalla:

Note: también puede ingresar ^g en el Encuentra lo que cuadro directamente, mantenga el cuadro reemplazar con vacío y luego haga clic en el reemplazar todo botón para eliminar todas las imágenes del documento;

Ahora, todas las imágenes de los documentos actuales se eliminan inmediatamente como se muestra a continuación.


Elimine fácilmente todas las imágenes del documento con Kutools para Word:

La Eliminar imágenes utilidad de Kutools for Word puede ayudarlo a eliminar rápidamente todas las imágenes de un rango seleccionado o todo el documento según lo necesite. Vea la operación como se muestra a continuación. ¡Descárgalo y pruébalo ahora! (60-día de ruta libre)


Elimine todas las imágenes del documento usando el código VBA

El uso del código VBA es otra forma más fácil de eliminar todas las imágenes del documento. Puede usar un código VBA de la siguiente manera para eliminar todas las imágenes del documento.

Paso 1: Presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana;

Paso 2: Click recuadro > Módulo, copie y pegue el siguiente código VBA en el Módulo ventana;

Paso 3: haga clic en Ejecutar botón para aplicar el VBA.

Código VBA: elimine todas las imágenes del documento:

Sub DitchPictures()
Dim objPic As InlineShape
For Each objPic In ActiveDocument.InlineShapes
objPic.Delete
Next objPic
End Sub

Ahora, todas las imágenes de los documentos actuales se eliminan inmediatamente como se muestra a continuación.


Elimina todas las imágenes del documento con Kutools para Word

Kutools for Word proporciona la forma más conveniente de eliminar todas las imágenes del documento. Puede eliminar todas las imágenes de todo el documento o todas las imágenes de la parte seleccionada del documento.

Kutools for Word : con más de 100 útiles complementos de Word, libre de probar sin limitación en 60 días.

Eliminar imágenes de un rango:

1. Seleccione el rango que contiene las imágenes que desea eliminar y luego aplique esta utilidad haciendo clic en Kutools > Más > Eliminar imágenes para eliminarlos de una vez. Ver captura de pantalla:

Eliminar imágenes de todo el documento:

1. Simplemente habilite la utilidad haciendo clic en Kutools > Más > Eliminar imágenes sin seleccionar ninguna parte del documento. Entonces un Kutools for Word Aparecerá un cuadro de diálogo para recordarle que debe eliminar todas las imágenes. Hacer clic para iniciar la eliminación.

Ahora, todas las imágenes de los documentos actuales se eliminan inmediatamente como se muestra a continuación.

Si desea tener una prueba gratuita de esta utilidad, vaya a descarga gratis el software primero, y luego vaya a aplicar la operación según los pasos anteriores.


Las mejores herramientas de productividad de oficina

Kutools for Word - Mejore su experiencia con Word con Over 100 ¡Características notables!

🤖 Asistente de IA de Kutools: Transforma tu escritura con IA - Generar contenido  /  Reescribir texto  /  Resumir documentos  /  Solicite información basado en el documento, todo dentro de Word

📘 Dominio del documento: Dividir páginas  /  Combinar documentos  /  Exportar selección en varios formatos (PDF/TXT/DOC/HTML...)  /  Convertir por lotes a PDF  /  Exportar páginas como imágenes  /  Imprima varios archivos a la vez...

Edición de contenidos: Buscar y reemplazar por lotes en varios archivos  /  Cambiar el tamaño de todas las imágenes  /  Transponer filas y columnas de tabla  /  Convertir tabla en texto...

🧹 Limpieza sin esfuerzo: barrer Espacios extra  /  Saltos de sección  /  Todos los encabezados  /  Cuadros de texto  /  Los hipervínculos  / Para obtener más herramientas de extracción, diríjase a nuestro Quitar grupo...

Inserciones creativas: Insertar Mil Separadores  /  Casillas de verificación  /  Botones de radio  /  Código QR   /  Barcode  /  Tabla de líneas diagonales  /  Título de la ecuación  /  Captura de imagen  /  Pie de tabla  /  Varias imágenes  / Descubre más en el Insertar grupo...

🔍 Selecciones de precisión: Localizar páginas específicas  /  tablas  /  formas  /  párrafos de encabezado  / Mejorar la navegación con más, Seleccionar características...

Mejoras de estrellas: Navegue rápidamente a cualquier ubicación  /  insertar automáticamente texto repetitivo  /  alternar sin problemas entre ventanas de documentos  /  11 herramientas de conversión...

👉 ¿Quieres probar estas funciones? Kutools para Word ofrece una prueba gratuita de 60 días.¡Sin limitaciones! 🚀
 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Great reminder about the find & replace>special>graphics option!

Saved me so much work!
This comment was minimized by the moderator on the site
i dont know but some of the graphic is not capturing in replace button.
This comment was minimized by the moderator on the site
Wow, yes thank you. Several other previous matches did not work.
This comment was minimized by the moderator on the site
Thank you so much for this how to - it saved me HOURS of work taking photos out of a document!! nancy
This comment was minimized by the moderator on the site
Your code will only remove inlineshapes, consider the following as I have sometimes seen problems when using collections Do While ActiveDocument.Shapes.count > 0 ActiveDocument.Shapes(1).Delete Loop Do While ActiveDocument.InlineShapes.count > 0 ActiveDocument.InlineShapes(1).Delete Loop I use these when changing a file to text only. I also convert all tables to tab delmited Do While ActiveDocument.Tables.count > 0 ActiveDocument.Tables(1).ConvertToText Separator:=wdSeparateByTabs Loop I have not seen any problems with do while loops, but have occasionally when deleting from a collection that I am playing with I alternatively use .count to get a total of items and use a for next with a step -1 to work on them backwards. By the way, I work on a Mac and objects sometimes act funny and some windows VBA objects are not even available.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations