来自EXCELHOME上的VBA加载系统时间的宏插件

laose 发表于: 2007-12-17 12:43 来源: 扑奔PPT网

在PPT中加载系统时间，经常导致系统运行速度变慢，而我们有时需要在PPT中加载系统时间，怎么办？到网上找寻解决方案，功夫不负苦心人，终于找到一个不错的宏插件。

该宏插件是在手绘PPT时钟的基础上，通过VBA调用时间函数和时钟图片素材来实现幻灯片母板自动插入动态时钟的。

使用方法：

将下载下来的压缩包截压
打开PPT软件，首先降低你的宏的安全性级别；
点PPT菜单“工具”<<“加载宏”，加载前面解压得到的宏插件“ShapeClock.ppa”
你会发现你的PPT工具栏上就会出现“ShapeClock”，点击后你的PPT母板中就自动加载了系统时钟了，运行PPT时钟就加载系统时间了。

来自EXCELHOME上的VBA加载系统时间的宏插件 (66 KB, 下载次数: 561)

大家对来自EXCELHOME上的VBA加载系统时间的宏插件的评论

feifeiyin 发表于 2008-2-13 11:48:43: 不错，下载学习一下先。
lcyjxjs 发表于 2008-3-09 22:12:42: 我也在研究这方面的东西，来论坛，受你的帮助不小呀，在些谢谢了，哈哈
v12388 发表于 2008-4-20 18:04:20: 我PPT工具栏上不出现“ShapeClock”!
amwyq 发表于 2008-4-20 19:00:26: PPA文件直接用PPT可以打开的。。。
非常不错，只是样式修改比较麻烦，位置怎么修改还没有办法，不好和课件画面有机结合。。。
谢谢楼主提供！

[ 本帖最后由 amwyq 于 2008-4-20 19:06 编辑 ]
Dirac 发表于 2008-4-21 23:18:41: QUOTE:
原帖由 amwyq 于 2008-4-20 19:00 发表
PPA文件直接用PPT可以打开的。。。
非常不错，只是样式修改比较麻烦，位置怎么修改还没有办法，不好和课件画面有机结合。。。
谢谢楼主提供！
可以修改，比较直接的办法是到母板里面手动调整图片的大小和位置，而且如有需要可以将程序默认读入的图片文档换成你自己设计的样式。当然也可以修改源文件代码，需要一定的VBA基础。

另外源程序中有若干小错误，不过不影响使用 (除非报告时间超过一小时)：
If lMin >= 720 Then
需要改成
If lHour >= 720 Then
amwyq 发表于 2008-4-24 12:12:19: 感谢楼上的高手指点。。。
我没有找到代码。。。
gd333000 发表于 2008-7-31 16:35:03: 需要看看，倒底是什么东东？
duzeng 发表于 2009-5-08 22:43:11: 谢谢楼主，我看看
tangqingfu 发表于 2009-6-29 00:11:38: QUOTE:
原帖由 v12388 于 2008-4-20 18:04 发表
我PPT工具栏上不出现“ShapeClock”!
已按版主的提示操作了,可还是出现上述的问题,请教如何解决?
hxhgxy 发表于 2009-8-23 14:38:21: 这是我尝试PPT VBA的小玩意，不过我自己做Presentation不用它的，纯粹是做着玩的。
qazxsw21 发表于 2011-4-07 21:58:06: 好东西，谢谢了