一、准备工作:
需修改两处注册表键值:
1、打开注册表编辑器(在运行中输入REGEDIT并执行)
2、定位到:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer\ActiveX Compatibility\{8856F961-340A-11D0-A96B-00C04FD705A2}将右侧 Compatibility Flags值21修改为0
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\ClickToRun\REGISTRY\MACHINE\Software\Microsoft\Office\16.0\Common\COM Compatibility\{8856F961-340A-11D0-A96B-00C04FD705A2}
将右侧 Compatibility Flags值400修改为0
以上可解决正常插入Microsoft web brower控件的问题,点击该控件之后,在页面释放并用鼠标拖动至与页面统一大小。(控件是无色的你可能看不见,但是如同形状一样,你可以选中并且自由调整大小)
软件要求:
1、powerpoint 2013及以上版本
2、保证你的ppt已经勾选并显示开发工具选项
二、操作细节:
1、在开发工具——其他控件列表中选择Microsoft web brower
2、在开发工具点击该控件之后,在页面释放并用鼠标拖动至与页面统一大小
3、
在该页面插入一个command命令控件(activeX控件),并在页面释放,调整大小。右键打开属性列表,在caption栏修改控件名称。
4、双击控件打开代码页面,在默认的两行代码中间插入如下代码:
WebBrowser1.Navigate ("file:///D:/R/Rscript/ID_20161002180535_403937.html")
括号里面的是需要添加的echarts生成的html路径,建议用浏览器打开后拷贝。当然,这个html也可以是其他有效的html网页地址。
5、
最后一步,也是非常重要的一步,如果想要动态效果不丢失,再保存ppt文档的时候一定不能使用默认保存选项,要另存为.pptm格式的宏文件,这样才能不丢失VBA代码。
6、 如果 加载html时 提示 安全警告: 为帮助保护你的安全 你的web浏览器已经限制此文件显示可能 访问你的计算机,需要在的下一行添加:
注:将echarts图表的html代码中加载 代码(*处至少为9或以上),将HTML设置成IE的内核。
7、解决 echarts 的console 未定义问题,在
中的注释下面 ,加入如下程序:window.console = window.console || (function(){
var c = {};
c.log = c.warn = c.debug = c.info = c.error = c.time = c.dir = c.profile = c.clear = c.exception = c.trace = c.assert = function(){};
return c;
})();
8、完成以上步骤之后,在幻灯片放映状态,定位到有设置控件的那一页,用鼠标点击按钮,就可以查看动态网页效果。