如何在Word Doc中嵌入PDF,并使用VBA访问该PDF?

时间:2012-09-10 15:36:42

标签: vba pdf excel-vba embed word-vba

我有一个单词doc,上面有一些ActiveX按钮。当按下其中一个按钮时,会弹出一个UserForm,并显示相应的PDF,如下所示:

enter image description here 这正是我想要的行为。然而,问题在于,为了使其工作,单词doc的用户也需要将每个PDF保存在他们的机器上。这是其中一个按钮的代码:

Private Sub AC1Button_Click()

    DisplayForm.AcroPDF1.LoadFile ("C:\Users\arose\Desktop\Security Control Doc\Sub PDFs\AC1.pdf")
    DisplayForm.Show

End Sub

正如您所看到的,路径是硬编码的。我需要能够分发这个单词doc而不需要随之分发一堆PDF,所以有没有办法将PDF文件嵌入到word文档中他们可以通过VBA访问的方式吗?

我发现here在任何办公室文档中嵌入PDF都相当容易。我试过了:

enter image description here

但我无法弄清楚如何在我的VBA代码中访问该PDF对象,以便在UserForm上显示它。

感谢任何见解,谢谢!

1 个答案:

答案 0 :(得分:2)

嵌入文件(并显示为图标以阻止他们接管您的文件)

要激活文档中的第一个OLE对象,

ThisDocument.InlineShapes(1).OLEFormat.Activate

是命令。