Saltar al contenido principal

¿Cómo insertar varias imágenes y cambiar su tamaño a la vez en Excel?

Es fácil para nosotros insertar una imagen en Excel, pero si necesita insertar varias imágenes a la vez para ahorrar mucho tiempo, ¿cómo podría hacerlo?


Inserte varias imágenes y cambie su tamaño de forma masiva mediante la función Insertar imagen

Podemos insertar varias imágenes a granel mediante la función (Insertar) Imagen en Excel y luego cambiar su tamaño simultáneamente. Haz lo siguiente:

1. En la hoja de trabajo, haga clic en recuadro > Imagen.

2. En el cuadro de diálogo Insertar imagen, abra la carpeta que contiene las imágenes que insertará, seleccione varias imágenes que necesite y haga clic en el recuadro botón. Ver captura de pantalla:
Note: Sosteniendo Ctrl clave, puede seleccionar varias imágenes no adyacentes haciendo clic en ellas una por una; participación Shift , puede seleccionar varias imágenes adyacentes haciendo clic en la primera imagen y la última.

Ahora las imágenes se insertan a granel y se apilan en la hoja de trabajo.

3. Mantenga estas imágenes seleccionadas y cambie su tamaño de forma masiva ingresando un nuevo número en ambos Ancho Mínimo y Altura cajas en el Tamaño grupo en el Formato lengüeta. Ver captura de pantalla:

Ahora todas las imágenes insertadas se cambian al mismo tamaño simultáneamente a la vez.

4. En la actualidad, debe mover manualmente cada imagen por separado a un lugar adecuado.

Note: Si hay docenas de imágenes apiladas, será bastante lento moverlas manualmente para que quepan en los lugares.

Inserte por lotes varias imágenes que coincidan con el contenido de la celda en Excel

La Imágenes de importación de partidos La característica de Kutools para Excel, es una herramienta fantástica que puede importar por lotes e insertar varias imágenes según el contenido de la celda, y cambiar el tamaño de las imágenes importadas al igual que el tamaño de la celda o al tamaño especificado fácilmente.


anuncio de fotos importadas 01

Kutools for Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfrute de una prueba GRATUITA de 30 días con todas las funciones sin necesidad de tarjeta de crédito! Consíguelo ahora

Inserte varias imágenes y cambie su tamaño de forma masiva con OneNote

Para evitar mover las imágenes apiladas una por una, este método presenta otro truco para insertar varias imágenes con la ayuda de OneNote. Haz lo siguiente:

1. Inicie OneNote y cree una nueva página. Y luego haga clic en recuadro > Imagen.

2. En el cuadro de diálogo Insertar imagen, abra la carpeta que contiene las imágenes que insertará, seleccione varias imágenes que necesite y haga clic en el recuadro botón. Ver captura de pantalla:
Note: Sosteniendo Ctrl clave, puede seleccionar varias imágenes no adyacentes haciendo clic en ellas una por una; participación Shift , puede seleccionar varias imágenes adyacentes haciendo clic en la primera imagen y la última.

doc insertar varias imágenes OneNote 032

3. prensa Ctrl + A para seleccionar todas las imágenes insertadas en OneNote y luego presione Ctrl + C claves para copiarlos.

4. Vaya a la hoja de trabajo en Excel y presione Ctrl + V claves para pegar las imágenes en la hoja de trabajo. Ahora todas las imágenes se pegan verticalmente como se muestra en la captura de pantalla izquierda.

5. Seleccione cualquiera de las imágenes y presione Ctrl + A teclas para seleccionarlas todas. Luego, cambie el tamaño de las imágenes a granel ingresando nuevos números en ambos Ancho Mínimo y Altura cajas en el Tamaño grupo en el Formato lengüeta. Ver captura de pantalla:

Ahora todas las imágenes especificadas se insertan en Excel y se redimensionan al mismo tamaño de forma masiva.


Inserte varias imágenes en Excel con código VBA

Con el siguiente código VBA, puede insertar varias imágenes en el archivo de Excel celda por celda.

1. Seleccione la primera celda del rango de destino en el que desea insertar imágenes.

2. Mantenga pulsado el ALT + F11 llaves, y abre el Microsoft Visual Basic para aplicaciones ventana.

3. Hacer clic recuadro > Móduloy pegue la siguiente macro en el Ventana de módulo.

Sub InsertPictures()
'Update 20140513
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Luego presione el F5 clave para ejecutar este código.

5. En el cuadro de diálogo Abrir, abra la carpeta que contiene las imágenes que desea insertar, seleccione varias imágenes que insertará y haga clic en el Abierto botón. Y todas las imágenes seleccionadas se han importado a su selección en función del tamaño de la celda. Ver captura de pantalla:


Inserte varias imágenes y ajústelas automáticamente con Kutools para Excel

Kutools for Excel, Importar imágenes La utilidad puede ayudarlo a insertar rápidamente varias imágenes en Excel según el tamaño de la celda o el tamaño de la imagen. También puede especificar la altura y el ancho de las imágenes según sus necesidades.

Kutools for Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfrute de una prueba GRATUITA de 30 días con todas las funciones sin necesidad de tarjeta de crédito! Consíguelo ahora

1. Hacer clic Kutools Más > Import / Export > Importar imágenes, ver captura de pantalla:

2. En la Importar imágenes cuadro de diálogo, haga lo siguiente:
(1) Especifique el orden de visualización de las imágenes del Orden de importación lista desplegable, puede elegir Llenar verticalmente celda tras celda or Rellenar horizontalmente celda tras celda.
(2) Click Añada para seleccionar los archivos de imagen o la carpeta para agregar las imágenes a la lista de imágenes. Y todas las imágenes seleccionadas aparecerán en el cuadro de lista.
(3) Haga clic en el Tamaño de importación botón;

3. Ahora en el Importar tamaño de imagen cuadro de diálogo, puede elegir el tamaño de la imagen que coincida con sus necesidades. Ver captura de pantalla:

4. Después de especificar el tamaño de la imagen, haga clic en OK para cerrar este cuadro de diálogo y volver al Importar imágenes diálogo, haga clic Importa botón para importar las imágenes.

5. En el nuevo cuadro de diálogo Importar imágenes, elija la primera celda del rango de destino en el que insertará imágenes y haga clic en OK del botón.

En la actualidad, todas las imágenes seleccionadas se han insertado en sus celdas desde la celda activa vertical u horizontalmente. Ver captura de pantalla derecha:

La Importar imágenes La función de Kutools para Excel está diseñada para insertar un lote de imágenes simultáneamente con el tamaño de celda correspondiente, el tamaño especificado o los tamaños propios de las imágenes en Excel. ¡Tenga una prueba gratis!


Inserte varias imágenes que coincidan con sus nombres con Kutools para Excel

Kutools para Excel también admite un dramático Imágenes de importación de partidos función para hacer coincidir imágenes y contenido de celda e insertar imágenes coincidentes solo de forma masiva en Excel.

Kutools for Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfrute de una prueba GRATUITA de 30 días con todas las funciones sin necesidad de tarjeta de crédito! Consíguelo ahora

1. Seleccione las celdas de su nombre de imagen en las que desea insertar sus imágenes coincidentes y haga clic en Kutools Más > Import / Export > Imágenes de importación de partidos. ver captura de pantalla:

2. En el cuadro de diálogo emergente Match Import Pictures, haga lo siguiente:
(1) Especifique el orden de visualización de las imágenes del Orden de importación la lista desplegable;
(2) Click Añada para agregar las imágenes al cuadro de lista de imágenes. Para su información, solo se enumerarán las imágenes que coincidan.
(3) Luego haga clic en Tamaño de importación del botón.

3. Ahora en el Importar tamaño de imagen diálogo, puede elegir el tamaño de la imagen que coincida con su necesidad y hacer clic en el Ok botón. Ver captura de pantalla:

4. Ahora regresa al Importar imágenes diálogo, haga clic Importa botón para importar las imágenes.

5. En el cuadro de diálogo emergente Match Import Pictures, especifique la primera celda del rango de destino donde insertará las imágenes y haga clic en OK botón. Ver captura de pantalla:

Hasta ahora, todas las imágenes se insertan en las celdas según sus nombres relativos. Ver captura de pantalla derecha:

La Imágenes de importación de partidos La función de Kutools para Excel puede ayudar a los usuarios de Excel a filtrar rápidamente imágenes en función de los valores de celda y luego insertar estas imágenes a granel. Además, estas imágenes coincidentes se pueden cambiar de tamaño al tamaño especificado o al tamaño de celda automáticamente. ¡Tenga una prueba gratis!


Demostración: inserte varias imágenes y cambie su tamaño a la vez en Excel

Kutools for Excel incluye más de 300 útiles herramientas para Excel, gratis para probar sin limitación en 30 días. Prueba gratis ahora!      ¡Compra ahora!


Artículos relacionados

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (47)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello community,

Thank you very much - this is a great tool!
But for my request, I should keep the sizes of the images, which are different. Is there any way to keep the format of the images but keep the functions with this code?

Many thanks in advance.
Elias
This comment was minimized by the moderator on the site
Respected sir, i want to One image paste on specific cell more than one in a time.
This comment was minimized by the moderator on the site
Hello, Sarfraz

If you want to insert one image into multiple cells, you just need to insert one image and resize it, and then copy and paste it to the other cells as you need.

Thank you!
This comment was minimized by the moderator on the site
mình cảm ơn vì bài viết. mình có làm danh sách sản phẩm hàng hóa mất rất nhiều thời gian nhưng chợt thấy chenanhexcel.com có bán add-in thì công việc của mình dễ dàng hơn nhiều.
This comment was minimized by the moderator on the site
Hi, i have 10 images i want to insert all 10 inside ONE CELL in excel. is this possible and if so pls help me out with some code pls...
This comment was minimized by the moderator on the site
Hi Vind,
First, adjust the cell and make it big enough to contain the 10 images.
Then Click Insert > Picture to open the Insert Picture dialog. In the dialog, select the 10 images together (if they are in the same folder), and click the OK button.
Now all images are inserted. If necessary, resize them simultaneously in the Size group on the Picture Format tab.
These images are inserted in the diagonal line of the cell as attached picture, and you need to adjust their positions manually.
This comment was minimized by the moderator on the site
I am using the following code, which came from Funzone, to add my photos but i need to be able to skip a column, leaving a blank column between photos, can someone help?

Sub InsertPictures()
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)

xColIndex = Application.ActiveCell.Column
xRowIndex = Application.ActiveCell.Row

If IsArray(PicList) Then

For lLoop = LBound(PicList) To UBound(PicList)
Set Rng = Cells(xRowIndex, xColIndex)
Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
xColIndex = xColIndex + 1
If xColIndex = 4 Then GoTo Continue1 Else GoTo Continue2

Continue1:
xRowIndex = xRowIndex + 2
xColIndex = xColIndex - 3

Continue2:
Next
End If
End Sub
This comment was minimized by the moderator on the site
I was finally able to figure it out on my own.

The code below will insert 3 pictures horizontally in the columns then move down a row and insert 3 more horizontally it will repeat this process until it runs out of the selected pictures.



Sub InsertPictures()
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)

xColIndex = Application.ActiveCell.Column
xRowIndex = Application.ActiveCell.Row

If IsArray(PicList) Then

For lLoop = LBound(PicList) To UBound(PicList)
Set Rng = Cells(xRowIndex, xColIndex)
Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
xColIndex = xColIndex + 1
If xColIndex = 4 Then GoTo Continue1 Else GoTo Continue2

Continue1:
xRowIndex = xRowIndex + 1
xColIndex = xColIndex - 3

Continue2:
Next
End If
End Sub
This comment was minimized by the moderator on the site
I would really like to use this VBA code to fill an array of cells with picture like 5 across then move to next row and 5 across until you run out of selected pictures but I just can't wrap my head around how to do it. Is this at all possible?


If you know how to do this please post the code. Thank you In advance!

Similar to https://www.extendoffice.com/documents/excel/3360-excel-transpose-every-5-rows.html
except by selecting pictures and pasting the output in an array.
This comment was minimized by the moderator on the site
I would really like to use this VBA code to fill an array of cells with picture like 5 across then move to next row and 5 across until you run out of selected pictures but I just can't wrap my head around how to do it. Is this at all possible?

Similar to https://www.extendoffice.com/documents/excel/3360-excel-transpose-every-5-rows.html
except by selecting pictures and pasting the output in an array
This comment was minimized by the moderator on the site
les agradezco mucho realmente ayudan muchisimo con el trabajo y el tiempo. Me sirvio perfecto para un inventario con fotos.
reitero mi agradecimiento
This comment was minimized by the moderator on the site
Tried this code and in all honesty is amazing and fast, however is there any chance of amending this to make it resize the pictures to a custom size.
I cannot seem to get my head around it.
Thanks
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations