Skip to main content

¿Cómo insertar varias imágenes con el nombre de archivo en un documento de Word?

Author: Xiaoyang Last Modified: 2025-08-06

En un documento de Word, puedes insertar rápidamente varias imágenes a la vez utilizando la función Insertar. Sin embargo, puede haber ocasiones en las que necesites incluir la ruta del archivo y los nombres de archivo como subtítulos al insertar las imágenes. Esto puede ser particularmente útil para documentación, informes o presentaciones donde es importante hacer referencia a la fuente de la imagen.

En este tutorial, te guiaremos a través de los pasos para insertar eficientemente varias imágenes junto con sus rutas de archivo y nombres de archivo como subtítulos en un documento de Word, ayudándote a gestionar tus imágenes de manera más efectiva.

Insertar varias imágenes con el nombre de archivo usando un código VBA

Insertar varias imágenes con el nombre de archivo usando Kutools para Word

Insertar varias imágenes con el nombre de archivo usando código VBA

El siguiente código VBA te ayuda a insertar varias imágenes junto con su ruta de archivo y nombre como subtítulos. Por favor, sigue estos pasos:

  1. Mantén presionado Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
  2. Haz clic en Insertar > Módulo, y pega el siguiente código en el módulo abierto: 
    Sub PicWithCaption()
    Dim xFileDialog As FileDialog
    Dim xPath, xFile As Variant
    On Error Resume Next
    Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
    If xFileDialog.Show = -1 Then
        xPath = xFileDialog.SelectedItems.Item(1)
        If xPath <> "" Then
            xFile = Dir(xPath & "\*.*")
            Do While xFile <> ""
                If UCase(Right(xFile, 3)) = "PNG" Or _
                    UCase(Right(xFile, 3)) = "TIF" Or _
                    UCase(Right(xFile, 3)) = "JPG" Or _
                    UCase(Right(xFile, 3)) = "GIF" Or _
                    UCase(Right(xFile, 3)) = "BMP" Then
                    With Selection
                        .InlineShapes.AddPicture xPath & "\" & xFile, False, True
                        .InsertAfter vbCrLf
                        .MoveDown wdLine
                        .Text = xPath & "\" & xFile & Chr(10)
                        .MoveDown wdLine
                    End With
                End If
                xFile = Dir()
            Loop
        End If
    End If
End Sub
  3. Presiona F5 para ejecutar el código. Aparecerá una ventana Examinar donde podrás seleccionar la carpeta que contiene las imágenes.

    4. Select a folder to insert pictures from

  4. Haz clic en Aceptar, y todas las imágenes de la carpeta seleccionada se insertarán en el documento de Word, con su ruta de archivo y nombre incluidos como subtítulos.

    Selected pictures are inserted into the document with filenames

Insertar varias imágenes con el nombre de archivo usando Kutools para Word

Usar Kutools para Word proporciona una manera eficiente de insertar varias imágenes junto con sus rutas de archivo y nombres en un documento de Word. Esta característica ahorra tiempo y asegura precisión en comparación con agregar manualmente los detalles del archivo. Con su función Imágenes, puedes realizar esta tarea sin esfuerzo.

Kutools para Word,equipado con inteligencia artificial 🤖, ofrece más de 100 funciones prácticas para simplificar tus tareas.

Después de instalar Kutools para Word, sigue estos pasos:

  1. Haz clic en Kutools > Multi-Imagen.

    Multi-Picture option on the Kutools tab on the ribbon

  2. En el cuadro de diálogo emergente Insertar Imágenes realiza las siguientes operaciones:
    • Haz clic en Agregar Archivos o Agregar Carpeta para seleccionar las imágenes que deseas insertar.
    • Marca la opción Insertar ruta del archivo de cada imagen como subtítulo en la parte inferior izquierda del cuadro de diálogo.
    • Haz clic en el botón Insertar para insertar las imágenes de una vez.

      Insert Pictures dialog box

  3. Después de insertar las imágenes, la ruta del archivo y el nombre de cada imagen se añadirán como subtítulo.

    Selected pictures are inserted into the document with filenames

Kutools para Word es el complemento definitivo para Word que agiliza tu trabajo y potencia tus habilidades de procesamiento de documentos. ¡Consíguelo ahora!

Las mejores herramientas de productividad para Office

Kutools para Word: ¡Mejora tu experiencia en Word con más de 100 funciones excepcionales!

🤖 Funciones de IA de Kutools: Asistente de IA / Asistente en Tiempo Real / Super Pulir (Conservar Formato) / Super Traducir (Conservar Formato) / Redacción AI / Revisión con IA...

📘 Dominio del Documento: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/HTML...) / Convertir en lote a PDF...

✏ Edición de Contenidos: Buscar y reemplazar en lote en varios archivos / Redimensionar todas las imágenes / Transponer filas y columnas de tablas / Convertir tabla a texto...

🧹 Limpieza sin esfuerzo: Elimina espacios extras / saltos de sección / cuadros de texto / hipervínculos / Para más herramientas de eliminación, ve al grupo Eliminar...

➕ Inserciones creativas: Insertar separadores de miles / casillas de verificación / botones de opción / Código QR / Código de Barras / múltiples imágenes / Descubre más en el grupo Insertar...

🔍 Selecciones precisas: Localiza páginas específicas / tablas / formas / Párrafos de Encabezado / Mejora la navegación con más funciones de Seleccionar...

⭐ Mejoras destacadas: Navega a cualquier ubicación / inserta automáticamente texto repetitivo / alterna entre ventanas de documento /11 herramientas de conversión...

🌍 Compatible con más de40 idiomas: Utiliza Kutools en tu idioma preferido: admite Inglés, Español, Alemán, Francés, Chino y más de40 idiomas.

Kutools and Kutools Plus tabs on the Word Ribbon
👉 ¿Quieres probar estas funciones? ¡Descarga Kutools para Word ahora! 🚀
 

Las mejores herramientas de productividad para Office

Kutools para Word: más de 100 herramientas para Word

Descarga gratuita Comprar ahora Más información sobre Kutools