☆ 吳慶偉
(濟南市歷城第三職業(yè)中專,山東濟南 250113)
在PowerPoint課件中插入圖片可以使課件更加活潑、生動、更具吸引力。然而,當需要批量插入圖片時,“插入/圖片”命令就顯得繁瑣而無趣。本文介紹了一種基于VBA的批量插入方法,很好地解決了這一問題。
PowerPoint(簡稱PPT)是目前最常用的演示設計工具之一。它簡單易用,功能完善,并有強大的多媒體功能,可以插入圖片、聲音、視頻等文件,使得課件圖、文、聲、形并茂,更具吸引力。正是這些優(yōu)點,使PowerPoint受到廣泛的青睞。
在PowerPoint中插入圖片的操作非常簡單,通常執(zhí)行“插入/圖片/來自文件…”命令,找到需要插入的圖片就可以,或者點擊“格式/背景”命令,也可以把圖片作為背景插入。然而,當遇到需要批量插入圖片的情況時,上述方法就顯得單調(diào)、繁瑣、浪費時間了。幸好MS Office辦公軟件給我們提供了強大的宏功能,可以很好地解決這一問題。
VBA(Visual Basic For Applications)是微軟開發(fā)出來在其桌面應用程序中執(zhí)行通用的自動化(OLE)任務的編程語言。VBA可以看做是Visual Basic的一個子集,但VBA又不同于VB。二者的區(qū)別主要體現(xiàn)在以下幾個方面:
(1)VB用于開發(fā)設計標準的應用程序,而VBA通常是使已有的應用程序自動化,可以創(chuàng)建自定義的解決方案,適于定制已有的桌面應用程序。
(2)VB具有自己的開發(fā)環(huán)境,而VBA必須寄生于已有的應用程序(如Word,Excel,PowerPoint等)。
(3)要運行VB開發(fā)的應用程序,用戶不必安裝VB集成開發(fā)環(huán)境,因為VB開發(fā)出的應用程序是可執(zhí)行文件(*.exe)。而VBA開發(fā)的程序必須依賴于它的父應用程序,例如 Word、PowerPoint等。
盡管存在這些區(qū)別,VBA和VB在結(jié)構(gòu)上仍然十分相似。事實上,如果已經(jīng)了解了VB,會發(fā)現(xiàn)學習VBA非???。相應的,學完VBA會給學習VB打下堅實的基礎。而且,當學會在PowerPoint中用VBA創(chuàng)建解決方案后,即已具備在 Word、Excel、Access、Outlook等中用 VBA 創(chuàng)建解決方案的大部分知識。因為在Microsoft產(chǎn)品系列中,VBA是相通的。
在PowerPoint課件中插入圖片的方法,大家都已經(jīng)掌握。下面就利用PowerPoint的VBA宏功能,一步步實現(xiàn)圖片的批量插入。
將需要插入的圖片準備好,放在一個文件夾里,并將圖片依次有規(guī)律地命名。例如:在F盤下新建文件夾,名稱為pictures,需要插入的所有圖片都放在此文件夾里,并依次命名為“pic1”、“pic2”、“pic3”……
打開 PowerPoint2003,依次單擊“工具/宏/Visual Basic編輯器”命令,或直接按下Alt+F11鍵,打開Visual Basic編輯器窗口(如圖1)。
圖1
在打開的Visual Basic編輯器窗口中,點擊“插入/模塊”菜單命令,在彈出的代碼編輯窗口中輸入以下代碼:如圖2。
圖2
輸入結(jié)束,點擊關(guān)閉Visual Basic編輯器,輸入的程序模塊將自動保存。
這是一段簡單的VB程序,稍有程序設計基礎就可以看懂。
回到PowerPoint編輯窗口,使用Ctrl+M快捷鍵新建與圖片數(shù)目相等的多個空白幻燈片。然后選擇“工具/宏/宏…”命令,或按下Alt+F8快捷鍵,打開宏對話框,選中我們上面建立的InsertPic宏,點擊“運行”即可,多張圖片很快就自動插入到幻燈片中(如圖3)。
圖3
如果需要經(jīng)常在PowerPoint中批量插入圖片,可以將編寫的宏添加到工具欄上。單擊菜單“工具/自定義”命令,打開“自定義”對話框并切換到“命令”選項卡,選中“類別”下邊列表框中的“宏”選項,此時在“命令”列表框中就會出現(xiàn)我們剛才新添加的宏了(如圖4)。
圖4
拖動“InsertPic”宏到工具欄中的任意位置,松開鼠標后,在工具欄上就添加了一個名為“InsertPic”的按鈕。右擊該按鈕可以自定義按鈕的名稱、背景等等。如可以將按鈕改名為“批量插入圖片”。以后只要單擊工具欄上的“批量插入圖片”按鈕,就可以自動完成背景圖片的插入工作了。
(1)這種方法是將圖片作為背景插入每張幻燈片的。
(2)實際應用過程中,程序模塊里圖片的地址和名稱要根據(jù)具體情況進行修改。
(3)如果按照上述方法不能實現(xiàn)圖片的批量插入,可能是PowerPoint宏的安全性設得太高了??梢詥螕簟肮ぞ撸辏踩浴泵?,將“安全級”設為“中”,重新打開PowerPoint,就可以正常插入了。