无法使用 Excel 中的 Word 应用程序

【问题标题】：Unable to work with word applications from excel无法使用 Excel 中的 Word 应用程序
【发布时间】：2017-04-07 08:17:47
【问题描述】：

我正在尝试从 excel 打开 word 文档，但在使用以下代码时卡在第一行。我添加了引用仍然得到编译错误 user-defined type not defined。

Dim oApp As Word.Application
Dim oSec As Word.Section
Dim oDoc As Word.Document

Set AppWord = CreateObject("Word.Application") 
Set oApp = New Word.Application
Set oDoc = oApp.Documents.Add

【问题讨论】：

参考文献中的Word库打勾了吗？
'User Defined Type Not Defined' error的可能重复

标签： excel vba ms-word user-defined-types

【解决方案1】：

您需要在 VBA 上下文中添加引用，方法是打开 VBA（开发人员选项卡，单击：Visual Basic），选择您的工作簿并从菜单中单击：工具、引用。

在引用列表中找到 Word 对象库并确保在单击确定之前对其进行检查

现在再试一次，别忘了让 oApp 可见！：

Sub Test()
   Dim oApp As Word.Application
   Dim oSec As Word.Section
   Dim oDoc As Word.Document

   Set AppWord = CreateObject("Word.Application")
   Set oApp = New Word.Application
   Set oDoc = oApp.Documents.Add

   oApp.Visible = True

End Sub

【讨论】：