Salt la conținutul principal

Cum să inserați mai multe imagini și să le redimensionați simultan în Excel?

Este ușor pentru noi să introducem o singură imagine în Excel, dar dacă trebuie să introduceți mai multe imagini simultan, astfel încât să puteți economisi mult timp, cum ați putea face?


Introduceți mai multe imagini și redimensionați-le în bloc prin funcția Inserare imagine

Putem insera mai multe imagini în bloc prin funcția (Inserare) imagine în Excel, apoi le putem redimensiona simultan. Vă rugăm să faceți următoarele:

1. În foaia de lucru, faceți clic pe Insera > Imagine.

2. În dialogul Inserare imagine, vă rugăm să deschideți folderul care conține imagini pe care le veți insera, selectați mai multe imagini după cum aveți nevoie și faceți clic pe Insera buton. Vedeți captura de ecran:
notițe: Deținere Ctrl tasta, puteți selecta mai multe imagini nonadiacente făcând clic pe ele una câte una; deținere Schimba , puteți selecta mai multe imagini adiacente făcând clic pe prima imagine și pe ultima.

Acum imaginile sunt inserate în bloc și stivuite în foaia de lucru.

3. Păstrați aceste imagini selectate și redimensionați-le în bloc introducând un număr nou în ambele Lăţime și Înălţime cutii în Mărimea grup pe Format filă. Vedeți captura de ecran:

Acum, toate imaginile inserate sunt schimbate simultan la aceeași dimensiune.

4. În prezent, trebuie să mutați manual fiecare imagine separat într-un loc potrivit.

notițe: Dacă există zeci de imagini stivuite, va fi destul de mult timp să le mutați manual în locuri potrivite.

Inserați în lot mai multe imagini care se potrivesc cu conținutul celulei în Excel

Potriviți imagini de import caracteristică Kutools pentru Excel, este un instrument fantastic care poate importa și insera mai multe imagini pe baza conținutului celulei și poate redimensiona cu ușurință imaginile importate la fel ca dimensiunea celulei sau la dimensiunea specificată.


potrivire anunț fotografii importate 01

Kutools pentru Excel - Supercharge Excel cu peste 300 de instrumente esențiale. Bucurați-vă de o încercare GRATUITĂ completă de 30 de zile, fără card de credit necesar! Ia-L Acum

Introduceți mai multe imagini și redimensionați-le în bloc cu OneNote

Pentru a evita mutarea stivuirii imaginilor una câte una, această metodă introduce un alt truc pentru a insera mai multe imagini cu ajutorul OneNote. Vă rugăm să faceți următoarele:

1. Lansați OneNote și creați o pagină nouă. Și apoi faceți clic pe Insera > Imagine.

2. În dialogul Inserare imagine, vă rugăm să deschideți folderul care conține imagini pe care le veți insera, selectați mai multe imagini după cum aveți nevoie și faceți clic pe Insera buton. Vedeți captura de ecran:
notițe: Deținere Ctrl tasta, puteți selecta mai multe imagini nonadiacente făcând clic pe ele una câte una; deținere Schimba , puteți selecta mai multe imagini adiacente făcând clic pe prima imagine și pe ultima.

doc introduceți mai multe imagini OneNote 032

3. presa Ctrl + A pentru a selecta toate imaginile inserate în OneNote, apoi apăsați Ctrl + C tastele pentru a le copia.

4. Mergeți foaia de lucru în Excel și apăsați Ctrl + V tastele pentru a lipi imaginile în foaia de lucru. Acum toate imaginile sunt lipite vertical așa cum este afișat ecranul din stânga.

5. Selectați oricare dintre imagini și apăsați Ctrl + A tastele pentru a le selecta pe toate. Apoi redimensionați imaginile în bloc introducând numere noi în ambele Lăţime și Înălţime cutii în Mărimea grup pe Format filă. Vedeți captura de ecran:

Acum, toate imaginile specificate sunt inserate în Excel și redimensionate la aceeași dimensiune în bloc.


Introduceți mai multe imagini în Excel cu cod VBA

Cu următorul cod VBA, puteți insera mai multe imagini în fișier Excel celulă cu celulă.

1. Selectați prima celulă a intervalului de destinație pe care doriți să o inserați.

2. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Microsoft Visual Basic pentru aplicații fereastră.

3. Clic Insera > Moduleși lipiți următoarea macro în fișierul Fereastra modulului.

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. Apoi apăsați pe F5 tasta pentru a rula acest cod.

5. În dialogul Deschidere, deschideți folderul care conține imaginile pe care doriți să le inserați, selectați mai multe imagini pe care le veți insera și faceți clic pe Operatii Deschise buton. Și toate imaginile selectate au fost importate în selecția dvs. pe baza dimensiunii celulei. Vedeți captura de ecran:


Introduceți mai multe imagini și reglați-le automat cu Kutools pentru Excel

Kutools pentru Excel'S Importați imagini utilitarul vă poate ajuta să inserați rapid mai multe imagini în Excel pe baza dimensiunii celulei sau a dimensiunii imaginii. Puteți specifica înălțimea și lățimea imaginilor după cum aveți nevoie.

Kutools pentru Excel - Supercharge Excel cu peste 300 de instrumente esențiale. Bucurați-vă de o încercare GRATUITĂ completă de 30 de zile, fără card de credit necesar! Ia-L Acum

1. Clic Kutools Plus > Import Export > Importați imagini, vezi captura de ecran:

2. În Importați imagini caseta de dialog, procedați după cum urmează:
(1) Specificați ordinea de afișare a imaginilor din Comanda de import lista derulantă, puteți alege Umpleți vertical celulă după celulă or Umpleți orizontal celulă după celulă.
(2) Faceți clic pe Adăuga butonul pentru a selecta fișierele de imagine sau folderul pentru a adăuga imaginile în lista de imagini. Și toate imaginile selectate vor fi listate în caseta listă.
(3) Faceți clic pe Dimensiunea importului buton;

3. Acum în Importați dimensiunea imaginii , puteți alege dimensiunea imaginii care se potrivește nevoilor dvs. Vedeți captura de ecran:

4. După specificarea dimensiunii imaginii, faceți clic pe OK pentru a închide acest dialog și a reveni la Importați imagini dialog, faceți clic pe Import pentru a importa imaginile.

5. În noua casetă de dialog Importați imagini, vă rugăm să alegeți prima celulă din intervalul de destinație unde veți insera imagini și faceți clic pe OK butonul.

În prezent, toate imaginile selectate au fost inserate în celulele dvs. din celula activă pe verticală sau orizontală. Vedeți captura de ecran din dreapta:

Importați imagini caracteristica Kutools pentru Excel este concepută pentru a insera un lot de imagini simultan cu dimensiunea celulei potrivite, dimensiunea specificată sau dimensiunile proprii ale imaginilor în Excel. Aveți o încercare gratuită!


Introduceți mai multe imagini care se potrivesc cu numele lor cu Kutools pentru Excel

Kutools pentru Excel acceptă, de asemenea, un dramatism Potriviți imagini de import caracteristică pentru a potrivi imagini și conținutul celulei și a insera imagini potrivite numai în bloc în Excel.

Kutools pentru Excel - Supercharge Excel cu peste 300 de instrumente esențiale. Bucurați-vă de o încercare GRATUITĂ completă de 30 de zile, fără card de credit necesar! Ia-L Acum

1. Selectați celulele cu numele imaginii pe care doriți să le inserați imaginile potrivite și faceți clic pe Kutools Plus > Import Export > Potriviți imagini de import. vezi captura de ecran:

2. În caseta de dialog Mărire imagini importate, faceți următoarele:
(1) Specificați ordinea de afișare a imaginilor din Comanda de import lista verticală;
(2) Faceți clic pe Adăuga pentru a adăuga imaginile în caseta de listă a imaginilor. Pentru informațiile dvs., vor fi listate numai imaginile potrivite.
(3) Apoi faceți clic pe Dimensiunea importului butonul.

3. Acum în Importați dimensiunea imaginii caseta de dialog, puteți alege dimensiunea imaginii care se potrivește nevoilor dvs. și faceți clic pe butonul Ok buton. Vedeți captura de ecran:

4. Acum te întorci la Importați imagini dialog, faceți clic pe Import pentru a importa imaginile.

5. În fereastra pop-up Match Import Pictures, vă rugăm să specificați prima celulă din intervalul de destinație în care veți insera imagini și faceți clic pe OK buton. Vedeți captura de ecran:

Până în prezent, toate imaginile sunt inserate în celule pe baza numelor lor relative. Vedeți captura de ecran din dreapta:

Potriviți imagini de import caracteristica Kutools pentru Excel poate ajuta utilizatorii Excel să filtreze rapid imaginile pe baza valorilor celulei și apoi să introducă aceste imagini în bloc. În plus, aceste imagini potrivite pot fi redimensionate automat la dimensiunea specificată sau la dimensiunea celulei. Aveți o încercare gratuită!


Demo: introduceți mai multe imagini și redimensionați-le simultan în Excel

Kutools pentru Excel include mai mult de 300 de instrumente la îndemână pentru Excel, gratuite pentru a încerca fără limitări în 30 de zile. Încercare gratuită acum!      Cumpara acum!


Articole pe aceeași temă

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...

Descriere


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
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