从word doc [VBA]中的表中显示OLE对象

Question

所以我需要在书签的 word doc 中显示图片。此图片作为 OLE对象存储在 MS Access数据库中。

我知道如何写书签

WordDoc.Bookmarks.Item("myBookmark").Range.Text = value

目前，这就是我所做的：

'xNum is the product number
Dim s As OLEObjects
Dim x As Integer
Dim rs As DAO.Recordset
xSQL = "SELECT stuff FROM table1 LEFT JOIN table2 ON table1.par = table2.par WHERE NumProduct=" & xNum
Set rs = CurrentDb.OpenRecordset(xSQL)
s = rs!stuff
x = 1
Do While Not rs.EOF
       If x = 1 Then
            '{Command to insert an OLE at a word's bookmark}
       ElseIf x = 2 Then
       ...
       End If
   rs.MoveNext
   x = x + 1
Loop
rs.Close

我的问题有解决方法吗？

P.S：我是vba / Ms Access的新手，但我做了一些C＃（看起来有点像vba）

Answer 1

所以我终于想出了一个解决方案！

这个想法是将每个图片（OLE对象）放在一个Access框架中的Image框架中，然后聚焦这个对象（图像框架），以便在我们的单词doc中进行复制和粘贴，在特定范围内我们刚刚开始。顺便说一下，必须启用，解锁和显示此图像框架。

亲切地说，开发人员回答他自己！