按照常用的方法點擊“插入→圖片→來自文件”菜單命令,然后一個一個選擇需要的圖片,或者點擊“格式→背景”命令,將圖片作為PowerPoint的背景導(dǎo)入,這樣也太浪費時間了。在這種情況下,可以借助PowerPoint強大的宏功能,將多步操作合并為一步,批量插入圖片。
第一步:首先準備好圖片,假設(shè)在C盤下面的Pictures文件夾內(nèi)有100張jpg格式的圖片,如“C:\Pictures\1.jpg”、“C:\Pictures\2.jpg”、“C:\Pictures\3.jpg”等,文件名是有序的數(shù)字。
第二步:啟動PowerPoint 2003,按下Alt+F11鍵打開Visual Basic編輯器窗口,點擊“插入→模塊”菜單命令,在彈出的代碼編輯窗口中輸入以下代碼:
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
第三步:關(guān)閉Visual Basic編輯器窗口,上面的模塊代碼會自動保存。此時,連續(xù)按Ctrl+M鍵建立與圖片數(shù)目相等(如:100)的多個空白幻燈片。按Alt+F8鍵打開宏對話框,選中我們上面建立的InsertPic宏,點擊“運行”即可,100張圖片很快就自動插入到幻燈片中了