假如有100張圖片,要批量插入到PPT里面,每張圖片一頁PPT,你會如何處理呢? 傳統(tǒng)方法:新建一頁ppt,然后插入一張圖片。如此重復操作,累死你! 下面教你兩招,都可以實現(xiàn)批量插入圖片! 方法1: 1、點擊“插入菜單” 2、選擇“圖像”組 3、點擊“新建相冊” 4、選擇好文件的路徑,進入100張圖片所在的目錄,按CTRL+A全選圖片 5、點插入創(chuàng)建 搞定! 方法2: 1、打開PPT 2、按下alt+F11,打開VB編輯窗口 3、點擊“插入-模塊” 4、在彈出窗口輸入下面的代碼: SubInsertPic() DimiAsInteger Fori=1ToActivePresentation.Slides.Count ActivePresentation.Slides(i).Select WithActiveWindow.Selection.SlideRange .FollowMasterBackground=msoFalse .Background.Fill.UserPicture'C:Pictures'&i&'.jpg' EndWith Next EndSub ; 5、關閉窗口,在PPT里面建立100張空白頁面(快捷鍵CTRL+M) 6、按下alt+F8,打開宏對話框,選中我們剛才建立的宏,點擊“運行” 搞定! 值得注意的是,代碼里面的路徑要修改為你保存圖片的路徑。 |
|