教你怎樣在在PPT里快速插入大量張圖片
當(dāng)微軟的Office與微軟VB中的宏功能相遇時(shí)，便可以創(chuàng)造出強(qiáng)大的功能，例如在這篇文章中就介紹了利用這兩個(gè)工具瞬間插入上百?gòu)垐D片。 如果要插入幾十甚至幾百?gòu)垐D片，并且要求每張圖片插入到每張幻燈片頁(yè)面上(即有幾張照片就要有幾張幻燈片)你會(huì)怎么做?
按照常用的方法點(diǎn)擊“插入→圖片→來(lái)自文件”菜單命令，然后一個(gè)一個(gè)選擇需要的圖片，或者點(diǎn)擊“格式→背景”命令，將圖片作為 PowerPoint的背景 導(dǎo)入，這樣也太浪費(fèi)時(shí)間了。在這種情況下，可以借助PowerPoint強(qiáng)大的宏功能，將多步操作合并為一步，批量插入圖片。
第一步：首先準(zhǔn)備好圖片，假設(shè)在C盤下面的Pictures文件夾內(nèi)有100張jpg格式的圖片，如“C：Pictures1.jpg”、 “C：Pictures2.jpg”、“C：Pictures3.jpg”等，文件名是有序的數(shù)字;
第二步：?jiǎn)?dòng)PowerPoint，按下Alt+F11鍵打開(kāi)VisualBasic編輯器窗口，點(diǎn)擊“插入→模塊”菜單命令，在彈出的代碼編 輯 窗口中輸入以下代碼： 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 ;
第三步：關(guān)閉VisualBasic編輯器窗口，上面的模塊代碼會(huì)自動(dòng)保存。此時(shí)，連續(xù)按Ctrl+M鍵建立與圖片數(shù)目相等(如：100)的多 個(gè)空白幻燈 片。按Alt+F8鍵打開(kāi)宏對(duì)話框，選中我們上面建立的InsertPic宏，點(diǎn)擊“運(yùn)行”即可，100張圖片很快就自動(dòng)插入到幻燈片中