PPT BULK Insert Picture

What would you do if you were to insert dozens of or even hundreds of pictures into PowerPoint and ask each picture to be inserted on each slide page (that is, there will be several slides in a few photos)? Click on the "insert → picture → from file" menu command, then choose a picture you want, or click the "format → background" command to import the picture as a PowerPoint background, which is a waste of time!

In this case, we can use PowerPoint's powerful macro capabilities to combine multi-step operations into one step and bulk insert pictures.

The first step: Prepare the picture first, assume in the Pictures folder below C disk has 60 jpg picture, such as "c:pictures1.jpg", "c:pictures2.jpg", "c:pictures3.jpg" and so on, The filename is an ordered number .

Step two: Start PowerPoint 2003, press ALT+F11 to open the Visual Basic Editor window, click the Insert → module menu command, and enter the following code in the pop-up Code editing window:

Sub Insertpic ()

Dim I as Integer

For i = 1 to ActivePresentation.Slides.Count

ActivePresentation.Slides (i). Select

With ActiveWindow.Selection.SlideRange

. FollowMasterBackground = MsoFalse

. Background.Fill.UserPicture "C:pictures" & I & ". jpg"

End With

Next

End Sub

Step three: Close the Visual Basic Editor window, and the module code above will be saved automatically. At this point, press ctrl+m continuously to create multiple blank slides that are equal to the number of pictures (for example: 60). Press Alt+f8 to open the Macro dialog box, select the INSERTPIC macro we established above, click "Run", 60 pictures will be automatically inserted into the slide.

What would you do if you were to insert dozens of or even hundreds of pictures into PowerPoint and ask each picture to be inserted on each slide page (that is, there will be several slides in a few photos)? Click on the "insert → picture → from file" menu command, then choose a picture you want, or click the "format → background" command to import the picture as a PowerPoint background, which is a waste of time!

In this case, we can use PowerPoint's powerful macro capabilities to combine multi-step operations into one step and bulk insert pictures.

The first step: Prepare the picture first, assume that in the Pictures folder below C disk has 60 jpg picture, such as "c:pictures1.jpg", "c:pictures2.jpg", "c:pictures3.jpg" and so on, the filename is an orderly number.

Step two: Start PowerPoint 2003, press ALT+F11 to open the Visual Basic Editor window, click the Insert → module menu command, and enter the following code in the pop-up Code editing window:

Sub Insertpic ()

Dim I as Integer

For i = 1 to ActivePresentation.Slides.Count

ActivePresentation.Slides (i). Select

With ActiveWindow.Selection.SlideRange

. FollowMasterBackground = MsoFalse

. Background.Fill.UserPicture "C:pictures" & I & ". jpg"

End With

Next

The

End Sub light slice.