基于加载项的PowerPoint演示功能扩展

使用微软演示文稿软件PowerPoint 演示幻灯片的过程中，；当用户选择该命令时，使用Windows API GetOpenFileName 调用Windows 内置的打开文件对话框，，提供给用户选择要打开的文件或程序;在用户选择文件或程序后，通过调用Windows APIShellExecute 来打开该文件或程序。

图1 扩展后的演示快捷菜单

图2 选择扩展命令后的“打开文档或程序” 对话框

3、功能实现

3.1、编写VBA 宏代码

在PowerPoint 新建一个演示文稿文件，然后依次选择菜单“ 工具” — “ 宏” — “ Visual Basic 编辑器” 进入Microsoft Visual Basic 窗口；然后在该窗口下单击菜单“插入”— “模块”，在当前工程下添加一个模块，进入VBA 编辑环境，并在右侧的代码窗口中输入以下代码：

具体代码请见本文附件文档。

3.2、安装PowerPoint 加载宏

为了能够让本机或其他机器上的所有的演示文件中都可以使用此程序的功能，需要将上述程序保存为PowerPoint 加载宏的格式，然后复制到相应的机器上并启用该加载宏。下面以PowerPoint 2003 为例说明操作方法。

首先关闭上述的Microsoft Visual Basic 窗口, 返回到Microsoft PowerPoint 窗口；然后依次选择“文件” — “另存为”，在“另存为” 对话框的“保存类型” 处选择“PowerPoint加载宏(*.ppa)”，然后指定名字并加以保存(此处取名为： 扩展PPT 的演示功能.ppa)。此时系统一般会自动将该文件保存在形如“X:\Documents and Settings\YYY\Application Data\Microsoft\AddIns “的文件夹中；其中X 为用户的Windows 系统所在盘(如C：)，YYY 为当前的用户名(如Administrator)。如果要在其他的计算机上使用该功能，也需要将该ppa 文件复制到相应计算机的类似文件夹。

加载宏保存在正确位置后并不能自动起作用，还必须将它添加到可用的加载宏列表中。具体方法是在PowerPoint 中依次选择“工具” — “加载宏” — “添加”，在打开的“添加新的PowerPoint 加载宏” 对话框中选择上述的ppa 文件即可。

4、结语

由于宏病毒已经成为危害Office 程序和文档的一个主要的病毒类型，因此微软的Office 程序中默认情况下都对运行宏的安全级设置为“高”： 此时在Visual Basic 编辑器窗口中如果运行宏会被禁止，在安装加载宏的时候也会出现不能安装的情况。为解决此类问题，可依次选择“ 工具” — “ 宏”— “安全性”，在“安全级” 选项卡中将安全级设置为“低”即可。

更多相关阅读