当需要在PowerPoint、Word和Excel中制作动态变化数据的课件或试卷时，建议读者采用Excel电子表格实现动态数据交换，它具有直观、可靠、易于修改和管理等优点。
　　本期“建立与应用Excel动态‘英语重点单词库’的PPT课件”一文用Excel电子表格作为动态重点单词库，实现PowerPoint与Excel间动态数据交换的方法如下。
　　生成“重点单词库”基本Excel表。
　　打开Excel软件，在第一行下列单元格中输入如下内容：A1（“重点单词序号”）、B1（“English”）、C1（“中文对照”）、D1（单词数）、E1（=COUNTA(B2:＄B＄65536)）、F1（单词组数）、G1（=IF(MOD(E1,4)<>0,INT(E1/4) 1, INT(E1/4))）。执行“文件→另存为”命令，保存“重点单词库.xls”文档（参阅网站所附文档）。
　　在PPT中引用Excel对象库。
　　在VBA编辑器窗口执行“工具／引用”命令，在相应对话框选中“Microsoft Excel 11.0 Object Library”，否则，在PPT中无法启用Excel文档。
　　在PPT中启用“重点单词库.xls”文档的基本代码。
　　’定义和准备文件名为“重点单词库.xls”的Excel文件
　　 Dim ExcelApp As Excel.Application’定义Excel应用程序变量
　　 Dim ExcelBook As Excel.Workbook’定义Excel工作簿变量
　　 Dim ExcelSheet As Excel.Worksheet’定义Excel工作表变量
　　 Set ExcelApp = CreateObject("Excel.Application") ’启用Excel
　　 Set ExcelBook = ExcelApp.Workbooks.Add ’为工作簿预留内存
　　’获取本演示文档所在文件夹中“重点单词库.xls”文件路径并打开该文件
　　 ExcelFilePath = Application.ActivePresentation.Path