在Excel VBA UserForm中显示PDF
在Excel VBA UserForm中显示PDF
提问于 2016-12-23 05:54:16
我正在运行Excel 2016，如果下面是一个兼容性问题，这可能是相关的……
简而言之，我正在尝试显示一个，嵌入在Excel的UserForm中。
比方说UserForm1，我有一个UserForm。
我已经启用了以下额外的引用：
- Microsoft Visual Basic for Applications Extensibility 5.3
- Adobe Acrobat浏览器控件类型库1.0
这允许我将Adobe PDF Reader添加为“附加控件”
控件显示为阴影框图标(左下角)，我不确定这是否意味着它。然后，如果我尝试将这些对象中的一个添加到UserForm1中(无论是以编程方式还是在设计视图中)，都会出现错误
找不到
元素
作为参考，我使用的VBA的相关行是：
Dim PDFviewer As AcroPDF
Set PDFviewer = PDForm.Frame1.Controls.Add("AcroPDF.PDF.1")这是我从Adobe论坛线程中摘录的：https://forums.adobe.com/thread/1065554
联机资源表明，AcroPDF控件可能不再受支持。如果是这样的话，有没有其他方法来实现我想要的？
回答 2
Stack Overflow用户
回答已采纳
发布于 2016-12-23 06:06:33
作为使用AcroPDF的替代方法，可以尝试使用WebBrowser对象。
它需要包含额外的控件
Microsoft Web Browser
在名为WebBrowser1的UserForm上添加一个WeBrowser
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部分更安全，这取决于机器设置，有时直接导航将启动下载而不是显示。
Stack Overflow用户
发布于 2021-10-27 13:18:48
作为使用variable作为src来回答Chadee Fouad问题的解决方法：
- 将html sintax传递给字符串。稍后，将您的变量添加到sintax中。
sHtml = ""
- 将您的
variablesHtml传递给IE.document.write
IE.Document.write sHtml
- 在Internet Explorer窗口中按
F12，您会注意到src就是您的路径。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/41292195
复制相关文章
相似问题
腾讯云开发者
