为什么使用CreateObject("Word.Application")会出错？

[rushing]

已经在工程里引用 MS Lib了阿。

[lihonggen0]

工程----引用---Microsoft Word X.0 Object library

Dim wrdApp As Word.Application
Set wrdApp = CreateObject("word.Application")


或者：

Dim wrdApp As Word.Application
Set wrdApp = New Word.Application

[rushing]

引用了9.0
错误为：

ActiveX控件不能创建对象

或者

自动化错误

[cogodunker]

应该是你没有正确引用lib。
应该是microsoft word 9.0 object library

[rushing]

引用没有错误。

[zdk]

引用后用New 关键字

[zdk]

dim withevents obj as Word.*

set obj=new Word.*

[aijunchai]

Dim App As Word.Application
Set App = CreateObject("Word.Application")

如果你的工程引用正确地化，当申明 App的时候就应该能出现类型Word.Application的提示
如果不出现提示，那你的引用可能有问题。