在某一MicrosoftOffice应用程序中控制其他MicrosoftOffice应用程序.docxVIP

在某一 Microsoft Office 应用程序中控制其他 Microsoft Office 应用程序 如果要在某一 Microsoft Office 应用程序中运行处理其他 Microsoft Office 应用程序中对象的代码，请按下列步骤进行。 在“引用”对话框 （“工具”菜单） 中设置对其他应用程序的类型库的引用。进行该操作之后，对象、属性和方法将显示在“对象浏览器”中，并且在编译时将检查语法。还可以获取这些对象、属性和方法的快捷帮助。 以特定的类型声明对象变量，该对象变量将引用其他应用程序中的对象。 请确保用提供对象的应用程序的名称限定了每一个类型。 例如，下列语句 声明了指向 Microsoft Word 文档的变量和另一个指向 Microsoft Excel 工作簿的变量。 3. Dim appWD As Word.Application, wbXL As Excel.Workbook 注意 如果希望代码早被绑定，则必须遵循前面的步骤。 使用要在其他应用程序中处理的对象的 OLE 程序标识符 作为参数来调用 CreateObject 函数，如下例所示。如果要查看相应的应用程序会话，请将 Visible 属性设置为 True 。 6. Dim appWD As Word.Application Set appWD = CreateObject(Word.Application) appWd.Visible = True 对包含在变量中的对象应用属性和方法。例如，下述指令创建新的Word 文档。 11. Dim appWD As Word.Application Set appWD = CreateObject(Word.Application) appWD.Documents.Add 对相应的应用程序处理结束后，用 Quit 方法将其关闭，如下例所示。 appWd.Quit 上页： Excel VBA 教程：控件和对话框事件