Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

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

En el documento de Word, puede insertar rápidamente varias imágenes a la vez utilizando la función Insertar. Pero, a veces, debe insertar la ruta del archivo y los nombres como título al insertar las imágenes. ¿Cómo podría lidiar con esta tarea en un archivo de Word?

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

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


Inserta varias imágenes con nombre de archivo en el documento de Word:

Con Kutools for Word, puede insertar rápidamente varias imágenes de una carpeta o varias carpetas en un documento de Word con la ruta y el nombre del archivo.

doc insertar imágenes con el nombre de archivo 6

Kutools for Word: con más de 100 complementos de Word prácticos, de prueba sin límite en días 60. Haga clic para descargar y prueba gratuita ahora!


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

El siguiente código de VBA puede ayudarle a insertar la ruta del archivo y el nombre como título al insertar las imágenes, haga lo siguiente:

1. Mantenga presionado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Y luego, haz clic recuadro > Módulo, copie y pegue el código siguiente en el módulo en blanco abierto:

Código de VBA: inserte varias imágenes con nombre de archivo:

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. Entonces presione F5 clave para ejecutar este código, se muestra una ventana Examinar, seleccione la carpeta que contiene las imágenes que desea insertar, vea la captura de pantalla:

doc insertar imágenes con el nombre de archivo 1

4. Luego haga clic OK botón, todas las imágenes en la carpeta seleccionada se han insertado en el documento de Word, y la ruta del archivo y el nombre se insertan como subtítulos, así que, vea la captura de pantalla:

doc insertar imágenes con el nombre de archivo 2


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

Si usted tiene Kutools for Word, Con su Imágenes función, puede insertar rápidamente varias imágenes con la ruta de archivo y el nombre en el documento de Word de inmediato.

Kutools for Word : con más de 100 complementos de Word prácticos, gratis para probar sin limitaciones en días 60.

Después de instalar Kutools for Word, haz lo siguiente:

1. Haz click Kutools > Imágenes, mira la captura de pantalla:

doc insertar imágenes con el nombre de archivo 3

2. En el estallado Insertar imágenes cuadro de diálogo, realice las siguientes operaciones:

  • (1.) Clic agregar archivos or Agregar carpeta para seleccionar las imágenes que desea insertar;
  • (2.) Luego verifica Insertar la ruta del archivo de cada imagen como título opción en la parte inferior izquierda del cuadro de diálogo;
  • (3.) Y luego haga clic recuadro botón.

doc insertar imágenes con el nombre de archivo 4

3. Después de insertar las imágenes, verá la ruta de archivo y el nombre de cada imagen también insertados, vea la captura de pantalla:

doc insertar imágenes con el nombre de archivo 5

¡Haz clic para descargar Kutools for Word y prueba gratuita ahora!



Herramientas recomendadas de productividad de palabras

Kutools para Word: más que las funciones avanzadas de 100 para Microsoft Word, ahorre su tiempo de 50

  • Las operaciones complicadas y repetidas se pueden realizar una sola vez en segundos.
  • Inserte varias imágenes a través de carpetas en el documento de Word a la vez.
  • Combine y combine varios archivos de Word en carpetas en uno con su orden deseado.
  • Divida el documento actual en documentos separados según el encabezado 1, el salto de sección u otros criterios.
  • Convierta archivos entre Doc y Docx, Docx y PDF, colección de herramientas para conversiones y selección comunes, y así...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    jairo aguirre · 26 days ago
    buenas noches amigo me ha servido mucho su información sinembargo me surge una duda cree que es posible incertar imagenes en word de la misma manera pero dentro de celdas incertadas?