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