VBA Excel,在UserForm中显示PDF
Wol*_*fie 6 pdf excel adobe vba
我正在运行Excel 2016,我不确定我是否有一个简单的兼容性问题或什么,希望有人可以帮我找到修复或建议替代...
简而言之,我试图在Excel中显示嵌入在UserForm中的PDF.
我说有一个UserForm UserForm1.
我启用了以下额外的参考:
Adobe PDF Reader
UserForm1
这允许我添加UserForm1为"附加控件"
控件显示为阴影框图标(左下角),我不确定它的含义.然后,如果我尝试将其中一个对象添加到Adobe PDF Reader(以编程方式和设计视图中),它会给我一个错误
找不到元素
作为参考,我使用的VBA的相关行是:
Dim PDFviewer As AcroPDF
Set PDFviewer = PDForm.Frame1.Controls.Add("AcroPDF.PDF.1")
我从这个Adobe论坛帖子中获取的内容:https://forums.adobe.com/thread/1065554
在线资源表明,可能不再支持AcroPDF控件.如果是这样,还有另一种方法可以实现我想要的吗？
谢谢
作为使用它的替代方法AcroPDF,请尝试使用WebBrowserObject.
它需要包括额外的控制
Microsoft Web Browser
在名为的UserForm上添加WeBrowser WebBrowser1
Private Sub UserForm_Click()
Me.WebBrowser1.Navigate "about:blank"
Me.WebBrowser1.Document.write "<HTML><Body><embed src=""C:\temp\SO_Answers\test.pdf"" width=""100%"" height=""100%"" /></Body></HTML>"
End Sub
您可以.Navigate直接使用PDF,但引用我的评论:
"使用html部分会更安全,具体取决于机器设置,有时直接导航会启动下载而不是显示."
| 归档时间： |
|
| 查看次数： |
11000 次 |
| 最近记录： |