在MS Word FROM ACCESS中更改嵌入式Excel工作表中的工作表数据

Question

好的，所以我能够成功地在MS Word文档中使用VBA更改嵌入式Excel工作表…从附在该文档上的代码

现在我正试图从MS Access更改MS Word文档中相同的嵌入式excel工作表。我已经成功连接到文档，并且已经能够更改其他项目;例如图像内容控件的图片，Header中字段的文本等。

我使用与实际文档相同的代码。下面是我在Word中做的(效果很好):

Dim oleObj as OLEFormat
Set oleObj = Me.Shapes("tblEBACostHistory").OLEFormat
oleObj.Activate
oleObj.Object.Sheets(1).Range("A3") = "test"
SendKeys "{ESC}"
Set oleObj = nothing

这是我在Access中的代码:

Dim oleObj as OLEFormat
Set oleObj = wdDoc.Shapes("tblEBACostHistory").OLEFormat

最后一行是失败的，给了我一个"Type Mismatch"错误。"wdDoc"很好，因为我已经能够对文档进行其他更改。

想法吗?

Answer 1

好了，我回答了我自己的问题。"类型不匹配"错误向我尖叫，这是某种参考库问题。我安装了Microsoft Word 14.0对象库，所以我不知道它为什么会失败。然后我想起来了:

所以我改成:

Dim oleObj as OLEFormat

:

Dim oleObj as Word.OLEFormat

它成功了!