☆ 吳慶偉

（濟(jì)南市歷城第三職業(yè)中專，山東濟(jì)南 250113）

在PowerPoint課件中插入圖片可以使課件更加活潑、生動(dòng)、更具吸引力。然而，當(dāng)需要批量插入圖片時(shí)，“插入／圖片”命令就顯得繁瑣而無趣。本文介紹了一種基于VBA的批量插入方法，很好地解決了這一問題。

一、引言

PowerPoint（簡(jiǎn)稱PPT）是目前最常用的演示設(shè)計(jì)工具之一。它簡(jiǎn)單易用，功能完善，并有強(qiáng)大的多媒體功能，可以插入圖片、聲音、視頻等文件，使得課件圖、文、聲、形并茂，更具吸引力。正是這些優(yōu)點(diǎn)，使PowerPoint受到廣泛的青睞。

在PowerPoint中插入圖片的操作非常簡(jiǎn)單，通常執(zhí)行“插入／圖片／來自文件…”命令，找到需要插入的圖片就可以，或者點(diǎn)擊“格式／背景”命令，也可以把圖片作為背景插入。然而，當(dāng)遇到需要批量插入圖片的情況時(shí)，上述方法就顯得單調(diào)、繁瑣、浪費(fèi)時(shí)間了。幸好MS Office辦公軟件給我們提供了強(qiáng)大的宏功能，可以很好地解決這一問題。

二、VBA簡(jiǎn)介

VBA(Visual Basic For Applications)是微軟開發(fā)出來在其桌面應(yīng)用程序中執(zhí)行通用的自動(dòng)化(OLE)任務(wù)的編程語言。VBA可以看做是Visual Basic的一個(gè)子集，但VBA又不同于VB。二者的區(qū)別主要體現(xiàn)在以下幾個(gè)方面：

（1）VB用于開發(fā)設(shè)計(jì)標(biāo)準(zhǔn)的應(yīng)用程序，而VBA通常是使已有的應(yīng)用程序自動(dòng)化，可以創(chuàng)建自定義的解決方案，適于定制已有的桌面應(yīng)用程序。

（2）VB具有自己的開發(fā)環(huán)境，而VBA必須寄生于已有的應(yīng)用程序（如Word，Excel，PowerPoint等）。

（3）要運(yùn)行VB開發(fā)的應(yīng)用程序，用戶不必安裝VB集成開發(fā)環(huán)境，因?yàn)閂B開發(fā)出的應(yīng)用程序是可執(zhí)行文件(*.exe)。而VBA開發(fā)的程序必須依賴于它的父應(yīng)用程序，例如 Word、PowerPoint等。

盡管存在這些區(qū)別，VBA和VB在結(jié)構(gòu)上仍然十分相似。事實(shí)上，如果已經(jīng)了解了VB，會(huì)發(fā)現(xiàn)學(xué)習(xí)VBA非?？?。相應(yīng)的，學(xué)完VBA會(huì)給學(xué)習(xí)VB打下堅(jiān)實(shí)的基礎(chǔ)。而且，當(dāng)學(xué)會(huì)在PowerPoint中用VBA創(chuàng)建解決方案后，即已具備在 Word、Excel、Access、Outlook等中用 VBA 創(chuàng)建解決方案的大部分知識(shí)。因?yàn)樵贛icrosoft產(chǎn)品系列中，VBA是相通的。

三、利用VBA實(shí)現(xiàn)PowerPoint課件中圖片的批量插入

在PowerPoint課件中插入圖片的方法，大家都已經(jīng)掌握。下面就利用PowerPoint的VBA宏功能，一步步實(shí)現(xiàn)圖片的批量插入。

1.準(zhǔn)備需要插入的圖片

將需要插入的圖片準(zhǔn)備好，放在一個(gè)文件夾里，并將圖片依次有規(guī)律地命名。例如：在F盤下新建文件夾，名稱為pictures，需要插入的所有圖片都放在此文件夾里，并依次命名為“pic1”、“pic2”、“pic3”……

2.編寫VBA宏命令

打開 PowerPoint2003，依次單擊“工具／宏／Visual Basic編輯器”命令，或直接按下Alt＋F11鍵，打開Visual Basic編輯器窗口（如圖1）。

圖1

在打開的Visual Basic編輯器窗口中，點(diǎn)擊“插入／模塊”菜單命令，在彈出的代碼編輯窗口中輸入以下代碼：如圖2。

圖2

輸入結(jié)束，點(diǎn)擊關(guān)閉Visual Basic編輯器，輸入的程序模塊將自動(dòng)保存。

這是一段簡(jiǎn)單的VB程序，稍有程序設(shè)計(jì)基礎(chǔ)就可以看懂。

3.利用宏命令批量插入圖片

回到PowerPoint編輯窗口，使用Ctrl＋M快捷鍵新建與圖片數(shù)目相等的多個(gè)空白幻燈片。然后選擇“工具／宏／宏…”命令，或按下Alt＋F8快捷鍵，打開宏對(duì)話框，選中我們上面建立的InsertPic宏，點(diǎn)擊“運(yùn)行”即可，多張圖片很快就自動(dòng)插入到幻燈片中（如圖3）。

圖3

4.添加“批量插入圖片”按鈕

如果需要經(jīng)常在PowerPoint中批量插入圖片，可以將編寫的宏添加到工具欄上。單擊菜單“工具／自定義”命令，打開“自定義”對(duì)話框并切換到“命令”選項(xiàng)卡，選中“類別”下邊列表框中的“宏”選項(xiàng)，此時(shí)在“命令”列表框中就會(huì)出現(xiàn)我們剛才新添加的宏了（如圖4）。

圖4

拖動(dòng)“InsertPic”宏到工具欄中的任意位置，松開鼠標(biāo)后，在工具欄上就添加了一個(gè)名為“InsertPic”的按鈕。右擊該按鈕可以自定義按鈕的名稱、背景等等。如可以將按鈕改名為“批量插入圖片”。以后只要單擊工具欄上的“批量插入圖片”按鈕，就可以自動(dòng)完成背景圖片的插入工作了。

四、需要注意的問題

（1）這種方法是將圖片作為背景插入每張幻燈片的。

（2）實(shí)際應(yīng)用過程中，程序模塊里圖片的地址和名稱要根據(jù)具體情況進(jìn)行修改。

（3）如果按照上述方法不能實(shí)現(xiàn)圖片的批量插入，可能是PowerPoint宏的安全性設(shè)得太高了?？梢詥螕簟肮ぞ撸辏踩浴泵睿瑢ⅰ鞍踩?jí)”設(shè)為“中”，重新打開PowerPoint，就可以正常插入了。