vba - 将单元格值从 Excel 拉入 Word(运行时错误 429)

Question

我一直无法从 excel 中获取单元格值并在 word 宏中使用它们(我正在尝试在 word doc 中的各种书签处插入来自工作表单元格的字符串值)。现在我只是想能够访问单元格值，但我想出了一个错误 429(ActiveX 组件无法创建对象)。任何有关如何从 excel 中提取值并在 word 中使用它们的帮助/建议将不胜感激。

Dim objExcel As New Excel.Application
Dim exWbs As Excel.Workbooks
Dim exWb As Excel.Workbook
Dim strWbName As String
Dim cisInfo As CIS

Sub PopulateDoc()
    Set exWb = New Excel.Workbook
    exWb = exWbs.Open("CIS.xlsx")
    exWb.Sheets("Property Information").Cells(2, 8).Value = "test"
End Sub

Answer 1

您不能创建 New WorkBook 的实例反而:

Set exWb = objExcel.Workbooks.Open("CIS.xlsx")

(您还需要添加对 Microsoft Excel XX 对象库的引用)