Excel和PPT定时保存的加载项

聂荻昌

安装说明：
0、不要改名字，不要点击安装文件里面的文件。
1、WPS请先安装VBA。安装软件在同级目录下（VBA_for_WPS）。
2、Microsoft Office需要先把开发工具的菜单显示出来（图1）。
3、将宏安全性设置为『启用所有宏』（图2）
4、以上都设置好了之后，点击下方按钮即可安装。
5、安装完成之后会提示是否关闭PPT，如果桌面有PPT文件正在使用，请选否。

使用说明：
0、PPT和Excel操作是一样的，不过PPT会调用Excel的程序。
1、安装之后在菜单栏『加载项』中会出现一个『定时保存』按钮（图3）。
2、点击该按钮，可以设置『保存的时间间隔』，『另存还是直接保存』，『另存的文件位置』，以及『多长时间删除过期的文件』（图4）。
3、删除缓存文件会在每次启动程序的时候检查删除，最低为3天，定时保存间隔最低为1分钟。
4、每隔时间间隔会判断文件是否有改动，如果有改动才会进行保存或另存操作。
5、可以打开Excel文件之后再打开PPT文件，但不要先关闭Excel文件，否则会弹窗提示。
6、反正遵守上述规则，不乱搞，是不会报错的。。。



开发说明
1、PPT定时保存是调用了Excel程序，至于为什么这样做，请参看避坑指南
2、代码里面都做了注释。
3、PPT需要修改注册表，才会有加载项设置的按钮
4、大部分宏运行的时候，立即窗口会有提示。
5、Run 函数可以跨软件调用宏，且参数可以是对象，第一个参数单引号括起来的是文件名
6、OnTime 函数可以跨软件设置Excel，不允许传递对象变量，有参数的情况下，需要用单引号括起来所有的字符串，与Run不同
7、PPT的Application对象只有一个，赋值New也是当前的Application，但Excel的Application可以有很多个，如果赋值New，会新打开软件，与之前的软件无关。且加载项是只读状态。




避坑指南
1、PPT没有Ontime函数
2、Word没有SaveCopyAs方法
3、PPT的加载项一旦加载，就无法更改，不允许操作VBE
4、PPT的窗体不会触发初始化事件。
5、一定要考虑关闭Excel软件，不然很有可能后台有好多个Excel软件，而且定时保存一直运行
6、PPT的加载项不允许出现Application，如果要使用必须先赋值New Application，否则无法创建ppam文件。报错无法编译与该文档相关的VBA代码。
7、PPT的加载项名字里面不允许出现『.』这个符号

lsc900707

感谢分享，挺一个！