excel中如何设置在特定时间后自动提醒

excel

小余在交易中心工作，经常要打电话通知相应的评委参加工程评标工作，有时工作一忙，就忘记通知而影响正常开标。由于他每天都用excel为登记相应的数据，于是，我就用excel为他设置了一个定时提醒的功能。文章末尾提供原文件供大家下载参考。1、启动excel，新建一文档，取名保存(如“提醒.xls”)。2、按“Alt+F11”组合键进入VBA编辑状态(如图1)。

(图片较大，请拉动滚动条观看)3、在左侧“工程资源管理器”窗口中，选中“VBAProject(提醒.xls)”选项，执行“插入模块”命令，插入一个新模块(模块1，参见图1)。4、将下述代码输入到右侧的编辑区域中：Sub auto_open() '设置一个自动运行的宏——auto_openApplication.OnTime TimeValue("08:30:00"), "tx" '设置提醒时间——08:30:00(可以根据需要修改)，设置调用提醒宏——tx。Application.OnTime TimeValue("09:30:00"), "tx" '再设置提醒一次。End SubSub tx() '设置一个显示提醒消息的宏(名称要与上述自动运行宏中调用的名称一致)。msg = MsgBox("通知张三、李四、王五评委参加下午评标!", vbInformation, "赶快打电话") '设置提醒对话框中的消息和标题(前面是消息内容，后面是对话框标题，请根据需要输入)。End Sub注意：①上述代码中，英文单引号及其后面的字符是对代码的解释，在实际输入时可以不需要(参见图1)。②如果设置多个提醒宏(tx1、tx2……)，并在自动运行宏中分别设置调用的时间，可以实现多个消息的定时提醒。5、输入完成后，退出VBA编辑状态，保存工作簿文档。6、以后，一上班，就启动excel，打开上述工作簿文档。设定时间一到，系统即刻弹出如图2所示的提示框，这下不会忘记了吧。原文件下载