¿Cómo insertar varias imágenes con el nombre de archivo en un documento de Word?
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:
- Mantén presionado Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
- 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
- Presiona F5 para ejecutar el código. Aparecerá una ventana Examinar donde podrás seleccionar la carpeta que contiene las imágenes.
- 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.
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.
Después de instalar Kutools para Word, sigue estos pasos:
- Haz clic en Kutools > Multi-Imagen.
- 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.
- Después de insertar las imágenes, la ruta del archivo y el nombre de cada imagen se añadirán como subtítulo.
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 (Mantener formato) / Super Traducir (Mantener formato) / Redacción AI / Revisión con IA...
📘 Dominio de Documentos: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/HTML...) / Convertir en lote a PDF...
✏ Edición de Contenido: Buscar y reemplazar en lote en varios archivos / Redimensionar todas las imágenes / Transponer filas y columnas de tabla / 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, visita el grupo Eliminar...
➕ Inserciones creativas: Insertar separadores de miles / Casillas de verificación / Botones de opción / Código QR / Código de Barras / Varias imágenes / Descubre más en el grupo Insertar...
🔍 Selecciones precisas: Selecciona 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 / Cambia entre ventanas de documentos /11 herramientas de conversión...

Las mejores herramientas de productividad para Office
Kutools para Word - ¡Más de 100 herramientas para Word!
- 🤖 Funciones de IA de Kutools: Asistente de IA / Asistente en Tiempo Real / Super Pulir / Super Traducir / Redacción AI / Revisión con IA
- 📘 Dominio de Documentos: Dividir páginas / Combinar documentos / Convertir en lote a PDF
- ✏ Edición de Contenido: Buscar y reemplazar en lote / Redimensionar todas las imágenes
- 🧹 Limpieza sin esfuerzo: Eliminar Espacios Extras / Eliminar Saltos de sección
- ➕ Inserciones creativas: Insertar separadores de miles / Insertar Casillas de Verificación / Crear Códigos QR