自动运行与加载宏的问题（PPT中VBA的小结，含倒计时器）

wenz · 发表于 2004-3-30 21:09

　　这是我用VBA的Timer制做的倒计时提醒加载宏： VOLCKklA.rar (15.83 KB, 下载次数: 1305)

这是最新用Shape做的，注意事项在片子里。你得自己修饰片子。时钟与剩余时间同时显示。

　　关于加载不上：我在PowerpointXP中做了测试，问题OfficeXP的安全性默认为“高”，使用者没有把安全性设置成"中"，这是个低级问题,我们都没注意到。

　　简单的运行方法：改变安全性，设置为"中"，双击该加载宏是。

　　去不掉加载宏菜单条的问题：从工具\加载宏中选择卸载，最好删除，重启Powerpoint就没有了，这不会删除加载宏文件。另外点加载按钮可以从任何位置来加载加载宏，那怕是桌面（对陌生人来说太E了）。

　　PPT中VBA自动运行的问题：在PPT中没有自动运行宏的功能，编辑PPT文件是设计模式，可通过按钮在播放时点击执行。

　　定时运行的问题：PPT没有象Excel中那样的Ontime函数，不必费心让它每隔多长去执行什么命令。不过你可以根据这个倒计时的原理来曲折实现，方法吗？先卖个关子，大家先想想吧。查看PPA加载宏源代码的方法如下： 1. 确保PowerPoint 没有启动，点击[开始]\运行\regedit.exe，点击[确定]（运行注册表） 2. 在注册表中找到下列键值： HKEY_CURRENT_USER\Software\Microsoft\Office\8.0\PowerPoint\Options 用你使用的版本替代粗体8.0（XP为10） 3. 在右边名称窗中右击：新建\双字节值，命名为“DebugAddins”，双击新建的DebugAddins，出现编辑双字节值的窗口，设置数值数据为1，关闭注册表。 4. 启动PowerPoint。 5. 按Alt+F11启动Visual Basic Editor，打开工程资源管理器，你将看到加载宏的资源列表，双击任何项目，可查看源码，如果工程有密码保护，将弹出密码确认框。你也可以直接双击PAA文件，再在VBE中查看源码。

[此贴子已经被作者于2005-8-2 10:33:41编辑过]

wenz · 发表于 2004-3-31 08:58

　　有关PPT中定时的问题，想作更深，可参见dispbbs.asp?BoardID=24&ID=18920 PPT Add-in 提供多用途的（老外的）　　本站的ngcg可做了不少这方面的尝试，大家可以参考：　　http://club.excelhome.net/viewthread.php?tid=104662 　　http://club.excelhome.net/viewthread.php?tid=105286

即时显示日期时间的作品： hqj2X5HP.rar (10.75 KB, 下载次数: 814)

(用母板做) 必要说明：日期与时间显示在母板上，所以每页都有，你可以修改母板，但第一，不要去年显示日期与时间的那个文本框。第二，计时一定要点击“开始放映”，你可以修改此按钮，但别忘了给它添加动作：运行宏“Start” 第三，停止时钟和播放，一定点击“结束放映”，否则代码一直运行，可能导致系统死机。第四，“结束放映”按钮，你可以修改此按钮，但别忘了把它放在最后一页上，并给它添加动作：运行宏“Stopit”。倡议：共建家园，期待高手。　　这个版块原是一个很冷淡的园子，经过大家的经营，现在繁荣了不少。其实大家用Powerpoint的比用Flash等的人多的多，大家都希望用好这个简单易用的软件，但微软的东西，我们能用到其功能的多少，真期望大家对此有较深的研究，把自己的新知或经验拿出来与大家共享。正如这里的Word版，原来也是不景气的，但渐渐地有了“守柔、七叶一枝梅、陈秀峰、如意、konggs”等一些知深的行家，这里也有象“好吃饭、多媒体”等几个新秀出现，期待他们成为高手，也期待有更多的新秀让大家敬仰。　　我擦亮眼睛期待着。

[此贴子已经被作者于2005-7-29 11:00:48编辑过]

cxffxc · 发表于 2004-4-1 08:00

不知为何，我在2002版本中加载不上？

wenz · 发表于 2004-4-1 08:32

在2000下做的,我没有2002.代码未加密,可自己修改一下.

vulnerable · 发表于 2004-4-7 13:53

怎么用呀!我很菜

wenz · 发表于 2004-4-8 16:07

在Powerpoint2000的环境中运行双击可加载，在帮助菜单右侧是否多了个[设置并播放]，如果没有就没有加载，可拷入以下目录：这是Win2000的环境

再从Powerpoint2000的工具菜单、加载宏中添加。

[此贴子已经被作者于2004-4-15 20:38:08编辑过]

wenz · 发表于 2004-4-15 20:39

用Powerpoint2000运行,在帮助菜单右出现一个设置并播放的菜单我刚下载了，运行后如图：

wenz · 发表于 2004-4-20 19:33

上课时,它随时告诉你还有多少时间,便于控制进度呀

wenz · 发表于 2004-4-20 23:05

以下是引用cxffxc在2004-4-1 8:00:00的发言： 不知为何，我在2002版本中加载不上？

我在Powerpoint2002中做了测试,问题在于使用者没有把安全性设置成"中",因为2002中安全性默认设置为"高".

aazicat · 发表于 2004-7-3 14:52

请教wenz：

是否可以公开VBA代码？我需要计秒，但是设置最少5分钟，显示最少5秒钟……

重酬！拜谢！！//bow

		自动登录	找回密码
密码			免费注册