如何为 Word 编程添加对 Excel VBA 的引用答案

【问题标题】：How to add references to Excel VBA for Word programming如何为 Word 编程添加对 Excel VBA 的引用
【发布时间】：2016-04-23 01:46:02
【问题描述】：

我正在尝试编写一个宏，它使用 Word 对象来创建基于 Word 模板文档的 Word 文档。

我在使用 Option Explicit 时遇到了一些困难。没有它，我可以省略 Dim ... 行，但我希望在那里。

这是目前为止的代码：

Option Explicit
Sub PopulateWordDoc()
    Dim wApp As Object
    Set wApp = CreateObject("Word.Application")
    Dim wdDoc As Word.Document ' User-defined type not defined error on this line
    Set wDoc = wApp.Documents.Open("C:\path\WordTestTemplateDoc.dotx", ReadOnly:=False)

    With wDoc
        .Content.Find.Execute FindText:="<Project ID>", ReplaceWith:="This is the project id....."
        .SaveAs2 Filename:=("C:\path\NewWordDoc.docx"), FileFormat:=wdFormatXMLDocument, AddtoRecentFiles:=False
    End With

结束子

【问题讨论】：

你要的叫“早绑定”。您目前正在做的是“后期绑定”。完整的文章可以在这里找到：support.microsoft.com/en-us/kb/245115

标签： vba excel

【解决方案1】：

如本文所述，在 VBE 中添加对 Microsoft Word xx.0 Object Library 的引用：

https://msdn.microsoft.com/en-us/library/office/gg264402.aspx

之后，VBE 甚至会像您为 Excel 编写代码时一样提供自动完成功能。

【讨论】：

【解决方案2】：

OptionExplicit 使您绝对必须声明您使用的所有内容。通过不添加语句，您告诉 VB 编译器它可以控制确定从未声明过的变量的类型。这有点懒惰，可能会导致潜在的问题。您应该始终声明所有变量。

【讨论】：

这就是我想要的原因