Tip: Other languages are Google-Translated. You can visit the English version of this link.
Log in
x
or
x
x
Register
x

or

How to insert multiple pictures and resize them at once in Excel?

It is easy for us to insert one picture into Excel, but if you need to insert multiple pictures at once so that can save much time, how could you do?

 Batch insert multiple pictures matching with cell contents in Excel

The Match Import Pictures feature of Kutools for Excel, is a fantastic tool that can batch import and insert multiple pictures based on cell contents, and resize imported pictures same as cell size or to the specified size easily. Full Feature Free Trial 60-day!
ad match imported pics 01

Kutools for Excel - Includes more than 300 handy Excel tools. Full feature free trial 60-day, no credit card required! Get it now!


 Insert multiple pictures and resize them in bulk by Insert Picture feature

We can insert multiple pictures in bulk by the (Insert) Picture feature in Excel, and then resize them simultaneously. Please do as follows:

1. In the worksheet, click Insert > Picture.

2. In the Insert Picture dialog, please open the folder containing pictures you will insert, select multiple pictures as you need, and click the Insert button. See screenshot:
Note: Holding Ctrl key, you can select multiple nonadjacent pictures with clicking them one by one; holding Shift key, you can select multiple adjacent pictures with clicking the first picture and the last one.

Now pictures are inserted in bulk and stacking in the worksheet.

3. Keep these pictures selected, and resize them in bulk by entering new number into both Width and Height boxes in the Size group on the Format tab. See screenshot:

Now all inserted pictures are changed to the same size simultaneously at once.

4. At present you need to manually move each picture separately to a fit place.

Note: If there are dozens of pictures stacking, it will be quite time-consuming to manually move them to fit places.


 Insert multiple pictures and resize them in bulk with OneNote

To avoid moving stacking pictures one by one, this method introduce another trick to insert multiple pictures with the help of OneNote. Please do as follows:

1. Launch OneNote, and create a new page. And then click Insert > Picture.

2. In the Insert Picture dialog, please open the folder containing pictures you will insert, select multiple pictures as you need, and click the Insert button. See screenshot:
Note: Holding Ctrl key, you can select multiple nonadjacent pictures with clicking them one by one; holding Shift key, you can select multiple adjacent pictures with clicking the first picture and the last one.

doc insert multiple pictures OneNote 032

3. Press Ctrl + A keys to select all inserted pictures in the OneNote, and then press Ctrl + C keys to copy them.

4. Go the worksheet in Excel, and press Ctrl + V keys to paste the pictures in the worksheet. Now all pictures are pasted vertically as left screenshot shown.

5. Select any one of the pictures, and press Ctrl + A keys to select all of them. Then resize the pictures in bulk by entering new numbers into both Width and Height boxes in the Size group on the Format tab. See screenshot:

Now all specified pictures are inserted in Excel and resized to the same size in bulk.


 Insert multiple pictures into Excel with VBA code


With the following VBA code, you can insert multiple pictures into Excel file cell by cell.

1. Select the first cell of destination range that you want to insert pictures.

2. Hold down the ALT + F11 keys, and it opens the Microsoft Visual Basic for Applications window.

3. Click Insert > Module, and paste the following macro in the Module Window.

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. Then press the F5 key to run this code.

5. In the Open dialog, please open the folder which contains the pictures that you want to insert, select multiple pictures you will insert, and click the Open button. And all the selected pictures have been imported into your selection based on the cell size. See screenshot:


 Insert multiple pictures and auto-adjust them with Kutools for Excel

Kutools for Excel’s Import Pictures utility can help you quickly insert multiple pictures into Excel based on the cell size or picture size. You can specify the pictures’ height and width as you need as well.

Kutools for Excel - Includes more than 300 handy Excel tools. Full feature free trial 60-day, no credit card required! Get it now!

1. Click Kutools Plus > Import / Export > Import Pictures, see screenshot:

2. In the Import Pictures dialog box, please do as follows:
(1) Specify the display order of pictures from the Import order drop down list, you can choose Fill vertically cell after cell or Fill Horizontally cell after cell.
(2) Click Add button to select the image files or folder to add the pictures into the Picture list. And all your selected pictures will be listed in the list box.
(3) Click the Import size button;

3. Now in the Import Picture Size dialog, you can choose the picture size matching your need. See screenshot:

4. After specifying the picture size, please click OK to close this dialog, and back to the Import Pictures dialog, click Import button to import the images.

5. In the new Import Pictures dialog box, please choose the first cell of destination range you will insert pictures, and click the OK button.

At present, all your selected pictures have been inserted into your cells from the active cell vertically or horizontally. See right screenshot:

The Import Pictures feature of Kutools for Excel is designed to insert a batch of pictures simultaneously with matching cell size, specified size, or pictures' own sizes in Excel. Have a Free Trial!


 Insert multiple pictures matching with their names with Kutools for Excel

Kutools for Excel also supports an dramatical Match Import Pictures feature to match pictures and cell contents and insert matched pictures only in bulk in Excel.

Kutools for Excel - Includes more than 300 handy Excel tools. Full feature free trial 60-day, no credit card required! Get it now!

1. Select your picture name cells that you want to insert their matching pictures, and click Kutools Plus > Import / Export > Match Import Pictures. see screenshot:

2. In the popped out Match Import Pictures dialog box, please do as follows:
(1) Specify the display order of pictures from the Import order drop down list;
(2) Click Add button to add the pictures to the picture list box. For your information, only matched pictures will be listed out.
(3) Then click Import Size button.

3. Now in the Import Picture Size dialog, you can choose the picture size matching your need, and click the Ok button. See screenshot:

4. Now you return to the Import Pictures dialog, click Import button to import the images.

5. In the popping out Match Import Pictures dialog, please specify the first cell of destination range you will insert pictures, and click the OK button. See screenshot:

So far, all the pictures are inserted into the cells based on their relative names. See right screenshot:

The Match Import Pictures feature of Kutools for Excel can help Excel users quickly filter pictures based on cell values and then insert these pictures in bulk. In addition, these matched pictures can be resized to the specified size or cell size automatically. Have a Free Trial!


Related articles


Recommended Productivity Tools

Ribbon of Excel (with Kutools for Excel installed)

300+ Advanced Features Increase Your Productivity by 71%, and Help You To Stand Out From Crowd!

Would you like to complete your daily work quickly and perfectly? Kutools For Excel brings 300+ cool and powerful advanced features (Combine workbooks, sum by color, split cell contents, convert date, and so on...) for 1500+ work scenarios, helps you solve 82% Excel problems.

  •  Deal with all complicated tasks in seconds, help to enhance your work ability, get success from the fierce competition, and never worry about being fired.
  •  Save a lot of work time, leave much time for you to love and care the family and enjoy a comfortable life now.
  •  Reduce thousands of keyboard and mouse clicks every day, relieve your tired eyes and hands, and give you a healthy body.
  •  Become an Excel expert in 3 minutes, and get admiring glance from your colleagues or friends.
  •  No longer need to remember any painful formulas and VBA codes, have a relaxing and pleasant mind, give you a thrill you've never had before.
  •  Spend only $39, but worth than $4000 training of others. Being used by 110,000 elites and 300+ well-known companies.
  •  60-day unlimited free trial. 60-day money back guarantee. Free upgrade and support for 2 years. Buy once, use forever.
  •  Change the way you work now, and give you a better life immediately!

Office Tab Brings Efficient And Handy Tabs to Office (include Excel), Just Like Chrome, Firefox, And New IE

  • Increases your productivity by 50% when viewing and editing multiple documents.
  • Reduce hundreds of mouse clicks for you every day, say goodbye to mouse hand.
  • Open and create documents in new tabs of same window, rather than in new windows.
  • Help you work faster and easily stand out from the crowd! One second to switch between dozens of open documents!
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.
    Javi · 1 years ago
    Amazing! Thank you!!
  • To post as a guest, your comment is unpublished.
    Mark · 2 years ago
    With the VBA how would I pull in an "image" that has multiple pages. In my example I am working with TIF files.
  • To post as a guest, your comment is unpublished.
    aloko · 2 years ago
    Hi
    good work
    but i face one problem
    this VBE code just work for normal cells
    can you modify it for merged cells
    you help is appreciated
  • To post as a guest, your comment is unpublished.
    Jason · 2 years ago
    How can I modify the following code so that pictures are populated in a selected range of cells across multiple columns and rows rather than in consecutive cells in successive rows in the same column?

    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.Get OpenFilename(Pi cFormat, MultiSelect:=True)
    xColIndex = Application.ActiveCell.Column
    If IsArray(PicList ) Then
    xRowIndex = Application.Act iveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
    Set Rng = Cells(xRowIndex , xColIndex)
    Set sShape = ActiveSheet.Sha pes.AddPicture( PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
    xRowIndex = xRowIndex + 1
    Next
    End If
    End Sub
  • To post as a guest, your comment is unpublished.
    Mitch · 2 years ago
    This code ALMOST works for my needs. I have 200 images, each image needs to go on it's own sheet. How do I go about that?