VBA 在EXCEL 中操作WORD 表格之一 第 1 页 共 9 页 VBA 对象引用的前期绑定与后期绑定 编辑:madmlwt 前言 系列问题涉及: 1.操作环境是:Ofeice 2003 完整版,Win XP 操作系统。 2.探讨主方向:在EXCEL 中用VBA 操作WORD 表格,进行EXCEL 数据与WORD 数据的相互读写及相应格式设置。 3.引用WORD 程序的方法:后期绑定。不需要在对象库中去勾选Microsoft Word 11.0 Object Library对象。 4.资料收集整理:网络查询、Ofeice 2003 相关程序自身的VBA 帮助、个人理解,本人是个编辑者。 5.相关实例:网络搜索引用、个人原创,在EXCEL 中实际操作通过。 综上,在后续的系列文章中的诸多说法、实例中,不再一一重复阐述说明。编辑此系列问题,可能已经滞后,仅供有此需要的朋友参考借鉴! 如有雷同,敬请见谅、免责! 一、问题的提出 试图在EXCEL 中用VBA 操作WORD 文档,结果在WORD 中能够正常使用的一些方法或属性,在EXCEL 中不能使用或使用后没有达到应该有的效果。 【例子】 在EXCEL 中用VBA 操作。 首先创建一个空白的新 WORD 文档,再写入 2 句话(作为 2 个段落),然后分别对这二个段落进行字体、字号和居中设置。 【要求】 在EXCEL 中用VBA 操作WORD 文档时, VBA 代码编辑过程中,不直接引用Microsoft Word 11.0 Object Library 对象,采用后期绑定Set wordAppl = CreateObject("Word.Application") 定义一个 Word 对象变量。 【操作】 VBA 在EXCEL 中操作WORD 表格之一 第 2 页 共 9 页 1.直接在WORD 文档中运行代码 ⑴在已经存在的操作 假定上面要求的WORD 文档已经创建,打开该文档。在键盘上按组合键Alt+F11,打开WORD 代码编辑窗口。在左边的“工程-Normal”下面窗格中双击“Project(当前打开的WORD 文档名称)”下面的“引用 Normal”图标,右边显示当前 WORD 文档的代码编辑窗口,复制并粘贴下面的代码。 Sub 设置() With ActiveDocument.Paragraphs(1).Range .Font.Size = 18 '字号 .Font.Name = "黑体" '字体 .Font.Bold = wdToggle '字型加粗 .ParagraphFormat.Alignment = wdAlignParagraphCenter ' 水平居中 End With End Sub 单击代码编辑窗口上方工具栏上的绿色三角形按钮 (或按键盘上的F5),运行上述代码,可以看到你打开的WORD 文档中的第一段文本,按要求进行了字体设置和水平居中。 ...