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

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

我使用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 

结束小组

Answer 1

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

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

之后，VBE甚至会为您编写Excel代码时提供自动完成function。

Answer 2

OptionExplicit使得它绝对必须声明你使用的所有东西。 通过不添加语句，您可以告诉VB编译器它正在控制决定从未声明的variablestypes。 这有点懒，可能会导致潜在的问题。 你应该总是声明所有的variables。