Office学院问题解答系统 > Excel电子表格 > 其他Excel问题 > 如何用excel巧妙设置定时提醒
已解决
如何用excel巧妙设置定时提醒 提醒,设置,工作,定时,输入
悬赏分:0 - - 阅读次数: 举报
如题
提问者:52office - 小学生 2级
最佳答案
举报  楼层: 1
小余在交易中心工作,经常要打电话通知相应的评委参加工程评标工作,有时工作一忙,就忘记通知而影响正常开标。

由于他每天都用Excel为登记相应的数据,于是,我就用Excel为他设置了一个定时提醒的功能。文章末尾提供原文件供大家下载参考。

1、启动Excel,新建一文档,取名保存(如“提醒.xls”)。

2、按“Alt+F11”组合键进入VBA编辑状态(如图1)。




(图片较大,请拉动滚动条观看)

3、在左侧“工程资源管理器”窗口中,选中“VBAProject(提醒.xls)”选项,执行“插入模块”命令,插入一个新模块(模块1,参见图1)。

4、将下述代码输入到右侧的编辑区域中:

Sub auto_open() '设置一个自动运行的宏——auto_open

Application.OnTime TimeValue("08:30:00"), "tx" '设置提醒时间——08:30:00(可以根据需要修改),设置调用提醒宏——tx。

Application.OnTime TimeValue("09:30:00"), "tx" '再设置提醒一次。

End Sub

Sub tx() '设置一个显示提醒消息的宏(名称要与上述自动运行宏中调用的名称一致)。

msg = MsgBox("通知张三、李四、王五评委参加下午评标!", vbInformation, "赶快打电话") '设置提醒对话框中的消息和标题(前面是消息内容,后面是对话框标题,请根据需要输入)。

End Sub

注意:①上述代码中,英文单引号及其后面的字符是对代码的解释,在实际输入时可以不需要(参见图1)。②如果设置多个提醒宏(tx1、tx2……),并在自动运行宏中分别设置调用的时间,可以实现多个消息的定时提醒。

5、输入完成后,退出VBA编辑状态,保存工作簿文档。

6、以后,一上班,就启动Excel,打开上述工作簿文档。设定时间一到,系统即刻弹出如图2所示的提示框,这下不会忘记了吧。原文件下载
回答者:风行 - 小学生 2级 - 提交时间:2007-1-16 12:12:00

我也要给他一个好评1  我要给他一个坏评0    点击左边的图片给他一个评价吧
共 1 条对最佳答案的评论
好评 ths
评论者:游客 - 提交时间:2010-2-23 12:00:00
共 0 条答复
对最佳答案的评论

评论字数在200 字以内
  好评 坏评