Today we will discuss how to insert multiple pictures in Excel at once. Microsoft Excel is a strong tool for storing, organizing, and manipulating data. Numerous operations can be performed with this software. Just like Microsoft Word or Microsoft PowerPoint, pictures can be organized in Excel as well.
Download Practice Workbook
Download this practice book to exercise the task while you are reading this article.
2 Easy Methods to Insert Multiple Pictures at Once in Excel
In this article, we will discuss and demonstrate two useful methods to insert multiple pictures in Excel. We will apply the Insert Picture feature and VBA code to accomplish this task.
Method 1: Using Insert Picture Feature to Insert Multiple Pictures at Once in Excel
This method includes the Insert Picture feature. This is the easiest method to insert a large number of images into the worksheet. To do so, you need to follow the steps below.
Steps:
First, in the worksheet, go to the Insert tab and then click on Pictures.
- Then, in the dialog box, please look for the folder where pictures are kept. Navigate to the folder and find the pictures. Select multiple pictures by clicking them and holding the Ctrl button.
- After selecting the pictures, click the Insert button.
- Subsequently, all the pictures will be inserted into the worksheet.
- Besides, you may also resize them in an identical shape. Keep these pictures selected, and put Width and Height values in the Picture Format tab.
- Finally, you can manually move the pictures into separate cells.
Read More: Excel VBA: Insert Picture from Folder (3 Methods)
Similar Readings
- How to Insert Picture in Excel Cell Background (3 Methods)
- Insert a Picture in Excel Header
- How to Insert Picture into Excel Cell (3 Methods)
- Insert Pictures Automatically Size to Fit Cells in Excel
- How to Lock Image in Excel Cell (2 Methods)
Method 2: Applying VBA code to Insert Multiple Pictures at Once in Excel
Additionally, you may use VBA code to insert multiple pictures at once. We will apply VBA code to insert multiple pictures in discrete cells. Simply, follow the steps below.
Steps:
- Initially, select the cell where you want your first picture to be (the imported pictures will have the same size as the size of the cells)
- Secondly, go to the Developer tab and click on Visual Basic and it will open Microsoft Visual Basic for Applications or, press Alt+F11.
- Then, click on Insert > Module.
- Subsequently, enter the following VBA code and press F5 to run it.
Sub InsertPictures()
Dim myPICLt() As Variant
Dim ImageFormat As String
Dim PicRng As Range
Dim PicShape As Shape
On Error Resume Next
myPICLt = Application.GetOpenFilename(ImageFormat, MultiSelect:=True)
myColInd = Application.ActiveCell.Column
If IsArray(myPICLt) Then
myRowInd = Application.ActiveCell.Row
For lLoop = LBound(myPICLt) To UBound(myPICLt)
Set PicRng = Cells(myRowInd, myColInd)
Set PicShape = ActiveSheet.Shapes.AddPicture(myPICLt(lLoop), msoFalse, msoCTrue, PicRng.Left, PicRng.Top, PicRng.Width, PicRng.Height)
myRowInd = myRowInd + 1
Next
End If
End Sub
- ‘Define the Variables
Dim myPICLt() As Variant
Dim ImageFormat As String
Dim PicRng As Range
Dim PicShape As Shape
- ‘Set variable to select multiple pictures from the application
myPICLt = Application.GetOpenFilename(ImageFormat, MultiSelect:=True)
- ‘Command to activate last used from a column
myColInd = Application.ActiveCell.Column
- ‘Apply the If condition for a variable with pictures
If IsArray(myPICLt) Then
myRowInd = Application.ActiveCell.Row
- ‘Apply For loop to take pictures one by one
For lLoop = LBound(myPICLt) To UBound(myPICLt)
- ‘Set Range for the pictures
Set PicRng = Cells(myRowInd, myColInd)
- ‘Set shapes for the pictures
Set PicShape = ActiveSheet.Shapes.AddPicture(myPICLt(lLoop), msoFalse, msoCTrue, PicRng.Left, PicRng.Top, PicRng.Width, PicRng.Height)
- Just like Method 1, in the dialog box select the pictures you want to import and click Open.
- Finally, the selected pictures will be imported into the worksheet. You can now rearrange the pictures into your preferred cells.
Read More: Insert Pictures Automatically Size to Fit Cells with VBA in Excel
Conclusion
In this article, we demonstrated two methods to enter multiple pictures in Excel at once. These methods allow users to insert multiple pictures into Excel more efficiently and effectively.