首页
学习
活动
专区
工具
TVP
发布
社区首页 >问答首页 >在Excel VBA UserForm中显示PDF

在Excel VBA UserForm中显示PDF
EN

Stack Overflow用户
提问于 2016-12-23 05:54:16
回答 2查看 19.2K关注 0票数 8

我正在运行Excel 2016,如果下面是一个兼容性问题,这可能是相关的……

简而言之,我正在尝试显示一个,嵌入在Excel的UserForm中。

比方说UserForm1,我有一个UserForm。

我已经启用了以下额外的引用:

  • Microsoft Visual Basic for Applications Extensibility 5.3
  • Adobe Acrobat浏览器控件类型库1.0

这允许我将Adobe PDF Reader添加为“附加控件”

控件显示为阴影框图标(左下角),我不确定这是否意味着它。然后,如果我尝试将这些对象中的一个添加到UserForm1中(无论是以编程方式还是在设计视图中),都会出现错误

找不到

元素

作为参考,我使用的VBA的相关行是:

代码语言:javascript
复制
Dim PDFviewer As AcroPDF
Set PDFviewer = PDForm.Frame1.Controls.Add("AcroPDF.PDF.1")

这是我从Adobe论坛线程中摘录的:https://forums.adobe.com/thread/1065554

联机资源表明,AcroPDF控件可能不再受支持。如果是这样的话,有没有其他方法来实现我想要的?

EN

回答 2

Stack Overflow用户

回答已采纳

发布于 2016-12-23 06:06:33

作为使用AcroPDF的替代方法,可以尝试使用WebBrowser对象。

它需要包含额外的控件

Microsoft Web Browser

在名为WebBrowser1的UserForm上添加一个WeBrowser

代码语言:javascript
复制
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部分更安全,这取决于机器设置,有时直接导航将启动下载而不是显示。

票数 10
EN

Stack Overflow用户

发布于 2021-10-27 13:18:48

作为使用variable作为src来回答Chadee Fouad问题的解决方法:

  1. 将html sintax传递给字符串。稍后,将您的变量添加到sintax中。

sHtml = ""

  1. 将您的variable sHtml传递给IE.document.write

IE.Document.write sHtml

  1. 在Internet Explorer窗口中按F12,您会注意到src就是您的路径。

票数 -1
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/41292195

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档