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

Question

我有一个带有一些 ActiveX 按钮的 word doc。当按下其中一个按钮时，会弹出一个 UserForm 并显示相应的 PDF，如下所示：

这正是我想要的行为。但是，问题在于，要使其正常工作，word doc 的用户还需要将每个 PDF 保存在他们的机器上。这是其中一个按钮的代码：

Private Sub AC1Button_Click()

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

End Sub

如您所见，路径是硬编码的。我需要能够分发这个word doc而不需要分发一堆PDF，所以有没有办法将PDF嵌入到word文档中一种可以通过 VBA 访问的方式？

我发现here 在任何办公文档中嵌入 PDF 相当容易。我已经试过了：

但我不知道如何在我的 VBA 代码中访问该 PDF 对象，以便在用户窗体上显示它。

感谢任何见解，谢谢！

Answer 1

嵌入文件（并显示为图标以阻止它们接管您的文档）

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

ThisDocument.InlineShapes(1).OLEFormat.Activate

是命令。