Cómo guardar todas las imágenes de un documento de Word

Cuando trabaje con documentos de Word que incluyen un gran número de imágenes, guardar cada una manualmente puede volverse tedioso e ineficiente. Afortunadamente, existen varios métodos prácticos que le permiten extraer rápidamente todas las imágenes incrustadas de una sola vez, agilizando el proceso y garantizando que no se pierda ninguna. En este tutorial descubrirá cuatro soluciones eficaces para guardar todas las imágenes de su documento de Word, cada una diseñada para adaptarse a distintas necesidades y escenarios.

Guarde todas las imágenes mediante la función Guardar como

Guarde todas las imágenes con Kutools para Word

Guarde todas las imágenes cambiando la extensión del archivo

Use código VBA para extraer y guardar automáticamente todas las imágenes

---

Guarde todas las imágenes mediante la función Guardar como

La función Guardar como ofrece una forma sencilla de extraer todas las imágenes de un documento de Word de una sola vez. Este método es especialmente útil si prefieres una solución que no requiera complementos ni configuración avanzada. A continuación, te explicamos cómo utilizarla:

1. Comience abriendo el documento que contiene las imágenes que desea guardar. A continuación, vaya a Archivo > Guardar como en la interfaz de Word.
2. En la lista desplegable Especificar formato de guardado, elija Página web (*.htm; *.html). Este formato exporta el documento separando las imágenes y otros elementos multimedia en una carpeta externa.
3. Haga clic en Guardar.

   

Tras guardar, se genera un archivo .htm y una carpeta asociada (con el nombre de su documento) en la ubicación que haya especificado. Dentro de esta carpeta encontrará todas las imágenes extraídas del documento en sus formatos originales. Este método es rápido y funciona con la mayoría de los documentos de Word estándar. No obstante, los nombres de las imágenes pueden ser genéricos y, en casos excepcionales, algunos tipos de imagen avanzados podrían no extraerse perfectamente. En documentos grandes, la clasificación de las imágenes podría requerir un esfuerzo adicional.

---

Guarde todas las imágenes con Kutools para Word

Kutools para Word ofrece una función específica denominada Exportar imagen/tabla a imágenes que le permite exportar eficazmente todas las imágenes de su documento con solo unos pocos clics. Este método resulta especialmente útil para usuarios que trabajan con documentos que contienen numerosas imágenes o que necesitan personalizar el formato de exportación y las carpetas de destino.

1. En la Cinta de opciones de Word, haga clic en KUTOOLS PLUS>Más>Exportar imagen/tabla a imágenes.

   

2. En el cuadro de diálogo Exportar imagen/tabla a imágenes, configure cuidadosamente las opciones de extracción:
   • Establezca Tipos en Imágenes para incluir únicamente imágenes en su exportación.
   • Seleccione el formato de imagen que prefiera (como PNG, JPG o BMP) en la lista desplegable Formato de exportación. Elegir el formato adecuado garantiza compatibilidad para usos futuros.
   • Haga clic en el botón para especificar la carpeta donde se guardarán todas las imágenes. ¡Confirme su selección y evite exportar las imágenes a una ubicación no deseada!

     

3. Haga clic en Exportar. Todas las imágenes del documento se extraerán y guardarán como archivos individuales en la carpeta seleccionada.

Esta solución permite la extracción masiva de imágenes, admite formatos flexibles y ofrece ventajas adicionales para gestionar tablas o gráficos especiales. Si su documento incluye diseños complejos o una combinación de tipos de imagen, Kutools simplifica todo el proceso. Asegúrese de que la carpeta de destino cuente con permisos de escritura para evitar errores durante la exportación.

---

Guarde todas las imágenes cambiando la extensión del archivo

Si prefiere no utilizar software adicional ni funciones integradas, puede extraer manualmente todas las imágenes convirtiendo el documento de Word en un archivo ZIP. Este método aprovecha el hecho de que los archivos .docx son, en esencia, archivos ZIP que contienen todos los recursos del documento. Aunque es algo técnico, resulta muy eficaz para acceder a los archivos de imagen originales. Siga estos pasos:

1. Haga clic con el botón derecho en su archivo de Word y elija Cambiar nombre.

   

2. Modifique la extensión del archivo sustituyendo .docx por .zip. Asegúrese de que las extensiones de archivo estén visibles en el Explorador de Windows.

   

3. Pulse Intro. Si aparece un mensaje de advertencia sobre el cambio del tipo de archivo, haga clic en Sí para continuar.

   

4. Haga clic con el botón derecho en el archivo ZIP y seleccione Extraer en [nombre del archivo] o utilice cualquier herramienta de extracción compatible.
5. Dentro de las carpetas extraídas, vaya a Word > Media. Este directorio contiene todas las imágenes incrustadas en el documento original.

   

Este método ofrece acceso directo a las imágenes en su compresión y calidad originales, siendo ideal para usuarios avanzados o extracciones masivas. Tenga cuidado de no modificar los archivos dentro de la carpeta descomprimida, ya que esto podría comprometer la posibilidad de restaurar el documento. Si su sistema no muestra las extensiones de archivo de forma predeterminada, actívelas en la configuración del Explorador de Windows antes de iniciar este proceso.

---

Use código VBA para extraer y guardar automáticamente todas las imágenes incrustadas

Una macro de VBA ofrece una solución automatizada para extraer y exportar todas las imágenes incrustadas del documento activo de Word a una carpeta especificada. Resulta especialmente útil para usuarios que trabajan habitualmente con documentos repletos de imágenes y buscan un proceso automático y repetible. Además, el enfoque basado en VBA es flexible: permite personalizar la carpeta de destino y ejecutar la extracción con mínima intervención por parte del usuario.

Es ideal para usuarios familiarizados con operaciones básicas de macros en Word. Antes de comenzar, asegúrese de que las macros estén habilitadas y de que cuente con permiso para ejecutar VBA en su dispositivo. Tenga en cuenta que esta solución funciona con imágenes alineadas e independientes, aunque podría no extraer formas o gráficos como imágenes.

1. Abra el documento de Word que contiene las imágenes que desea extraer y asegúrese de que esté activo y visible.

2. Pulse las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.

3. En la ventana de VBA, haga clic en Insertar > Módulo. A continuación, copie y pegue el siguiente código VBA en el panel del módulo:

Código VBA: Extraer y guardar todas las imágenes incrustadas del documento activo

Sub ExportImagesPreserveOriginal()
'Updated by Extendoffice.com
    Dim doc As Document
    Dim tempPath As String
    Dim exportFolder As String
    Dim fso As Object
    Dim htmlPath As String
    Dim imgFolder As String
    Dim file As Object
    Dim subFolder As Object
    Dim xTitleId As String
    Dim foundImages As Boolean
    
    On Error Resume Next
    xTitleId = "Kutools for Word"

    ' Ask user for destination folder
    exportFolder = InputBox("Enter the full folder path to save images:", xTitleId, "C:\ExtractedImages")
    If exportFolder = "" Then Exit Sub
    If Right(exportFolder, 1) <> "\" Then exportFolder = exportFolder & "\"

    Set fso = CreateObject("Scripting.FileSystemObject")
    If Not fso.FolderExists(exportFolder) Then fso.CreateFolder exportFolder

    ' Save current document as filtered HTML (temporary)
    Set doc = ActiveDocument
    tempPath = Environ("TEMP") & "\WordImageExport_"
    htmlPath = tempPath & Format(Now, "yyyymmdd_hhnnss") & ".htm"
    
    doc.SaveAs2 FileName:=htmlPath, FileFormat:=wdFormatFilteredHTML

    ' Find the generated "_files" folder that contains the images
    imgFolder = Left(htmlPath, Len(htmlPath) - 4) & "_files"
    
    foundImages = False
    If fso.FolderExists(imgFolder) Then
        For Each file In fso.GetFolder(imgFolder).Files
            If LCase(Right(file.Name, 4)) = ".jpg" Or _
               LCase(Right(file.Name, 4)) = ".png" Or _
               LCase(Right(file.Name, 4)) = ".gif" Or _
               LCase(Right(file.Name, 4)) = ".bmp" Then
                fso.CopyFile file.Path, exportFolder & file.Name, True
                foundImages = True
            End If
        Next file
    Else
        For Each subFolder In fso.GetFolder(fso.GetParentFolderName(htmlPath)).SubFolders
            If InStr(1, subFolder.Name, "_files", vbTextCompare) > 0 Then
                For Each file In subFolder.Files
                    fso.CopyFile file.Path, exportFolder & file.Name, True
                    foundImages = True
                Next file
            End If
        Next subFolder
    End If

    On Error Resume Next
    fso.DeleteFile htmlPath, True
    fso.DeleteFolder imgFolder, True

    If foundImages Then
        MsgBox "All images have been exported successfully to:" & vbCrLf & exportFolder, vbInformation, xTitleId
    Else
        MsgBox "No images found in the document.", vbExclamation, xTitleId
    End If
End Sub

4. Pulse la tecla F5para ejecutar la macro. Cuando se le solicite, indique la carpeta de destino (por ejemplo,)C:\ExtractedImages) en la que desee guardar todas las imágenes.

Esta macro procesará todas las imágenes alineadas e independientes del documento activo de Word, copiando cada una a un archivo generado en la carpeta que haya seleccionado. Asegúrese de que dicha carpeta exista y de que disponga de permisos para escribir archivos en ella. Las imágenes resultantes se guardarán en su tipo de archivo original. Si encuentra errores, verifique la ruta del archivo y la configuración de seguridad de macros.

Este enfoque VBA resulta altamente eficaz para tareas repetitivas y grandes volúmenes de imágenes. No obstante, podría no extraer otros tipos de gráficos, como SmartArt o ecuaciones. Si no estás familiarizado con VBA, te recomendamos revisar las prácticas de seguridad y copia de seguridad relacionadas con macros antes de proceder.

---