在PPT中导入html图表

最新推荐文章于 2024-05-02 17:43:45 发布

新一盏明月

最新推荐文章于 2024-05-02 17:43:45 发布

阅读量748

点赞数

文章标签： powerpoint html

本文链接：https://blog.csdn.net/qq_66743633/article/details/134185951

版权

参考以上博客完成控件的导入

点击其他控件（如下所示），选择Microsoft web browser

点击确定后，鼠标变成十字形，在ppt中拖动鼠标创建幕布：

而后双击幕布跳转到代码页面，创建模块：VBAProject（右键）->插入->模块，结果如下：

修改模块1代码如下：

Sub OnSlideShowPageChange(ByVal Wn As SlideShowWindow)
Slide121.WebBrowser1.Navigate ("file:///F:/code/deceptive.html")
End Sub

其中，修改路径为自己想要展示的网页路径；修改代码中的“Slide121”为自己Microsoft Power Point对象目录下的名字，对于我来说是Slide121。

ctrl+s保存后，在ppt中放映该页面，可看到html网页，此时没问题的话已经能正常显示并且实现动态交互。

对于我来说，在放映时一开始不显示页面，滚动鼠标翻几次页之后可以显示图像，但是图像渲染有问题，试了几次后发现是<script>标签下的js没有渲染成功，正常图像为：

在ppt中的显示为：

绘制方式采用的是d3绘制，js部分的代码完全没有发挥作用。看了一些博客之后，怀疑是IE内核的问题，参照一下博客修改之后，依旧不能达到目的。

怀疑只能放入echarts绘制的图表或者pyecharts，进行试验之后直接出现报错，但是已经不想改了

根据上述方式添加完web browser控件之后，点击添加命令控件：CommandButton。（点击后鼠标变为十字，在ppt中拖动形成命令控件）（一定要先添加web browser控件画出展示html的框框之后，再添加命令控件！不然不会显示图像的）

双击打开代码，右键打开属性表在caption行修改按钮的名称。将代码修改如下：

照例修改“Slide122”和路径为自己的。而后进行放映ppt，点击按钮之后出现网页。

但是我仍然出现js不能成功渲染的问题，参考博客修改web browser使用的内核，仍然不能解决问题。可能是旧版的IE内核不支持新版js的渲染。也有的说下载最新版的IE版本可以解决，但太麻烦了遂放弃。

另外：有的博主写的是添加这个控件实现，我试的和commandbutton控件的使用方式相同，添加的代码也一样。

关注