|
背景：公司会议多，管理难，经常拖延时间，按照会议管理技巧，需要设置计时员，通常用按铃，实际操作很困难，大家激烈讨论中，按还是不按？或者设置专职计时员，浪费人力。 程序目的：对会议按照议题进行时间控制，按照设置提醒时间，提前提醒，到时提醒，延迟后每隔5分钟继续提醒。 模版制作中得到extyg等人的帮助，在此感谢。我是2000年已经注册的EH会员，只是中间出差，经常不用，用户名密码都忘了，又重新注册。今非昔比，黄花菜茁壮成长，EH发展如此之快，感叹之余，拙作奉上，抛砖供大家继续完善，希望能看到大家共同完成一个封装完美的会议管理工具。 没有解决好的问题： - 代码没有规划，很多重复的地方可以公用代码。没有用公共变量，过程变量存储在表格中；（IT吃青春饭，过了30，身不由己）
- 错误解决生硬，没有区别不同的错误进行解决。
- 想调用笨笨钟时钟，没有做到。可以参考笨笨钟一些功能。（上网搜索笨笨钟）
- 和正在使用的应用程序，比如PPT衔接接转没有做到；
- 完整的应支持个性Logo等信息。
- 其他问题，等今晚会议试用后再总结。
希望各位EH高手能够关注，希望大家能够收集更多需求，把这个东东完善了。个人觉得工作中还是有需求。特别是大公司，那么多会议室经常满满的，且总是延迟到晚上。会议的控制和效率很重要。 晚上测试除了问题Bug了：请高手指点。原来在其中窗体Endform中的代码用了 On error goto 掩盖了其中的Ontime Now,,False 取消原来未执行Ontime 语句 中的错误。详见求助： http://club.excelhome.net/viewthread.php?tid=350878 提示：作用于Application的对象失败。请教各位：可能的问题是什么？
－－－－－－－－－ 已经解决：http://club.excelhome.net/viewthread.php?tid=11821&replyID=&skin=0 主要是取消的那个Application.OnTime EarliestTime:=TimeValue("17:00:00"), _
Procedure:="my_Procedure", Schedule:=False中的EarliestTime：必须和早先预设的time一致。我保存了原来的时间，后边取消就可以了。 不过，如果已经执行的Ontime，再用Ontime....False取消会出现1004错误，我用On Error Resume跳过。 
[此贴子已经被作者于2008-9-3 11:18:11编辑过] | 
沪公网安备 31011702000001号 沪ICP备11019229号-2
发表于 2008-9-2 18:31
