更改MS Word中的嵌入式Excel工作表中的工作表數據來自訪問

Question

好吧，所以我能夠成功地在MS Word文檔中使用VBA更改嵌入式Excel工作表...從附加到該文檔的代碼中。

現在我試圖從MS Access中更改MS Word文檔中相同的嵌入式Excel工作表。我已成功連接到文檔並能夠更改其他項目;如圖像內容控件的圖片，標題中的字段文本等。

我使用的是與實際文檔相同的代碼。以下是我做到了從內字（這工作得很好）：

Dim oleObj as OLEFormat 

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

下面是從訪問中我的代碼：

Dim oleObj as OLEFormat 

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

最後一行就是失敗，並給了我一個「類型不匹配」錯誤。 'wdDoc'很好，因爲我可以對文檔進行其他更改。

想法？

Answer 1

好吧，我回答了我自己的問題。 「類型不匹配」錯誤向我尖叫，這是某種參考庫問題。我已經包含了Microsoft Word 14.0 Object Library，所以我無法弄清楚它爲什麼會失敗。然後，它向我走來：

因此，我改變：

Dim oleObj as OLEFormat 

到：

Dim oleObj as Word.OLEFormat 

和它的工作！