小余在交易中心工作,经常召集相应的评委参与项目评标。有时工作忙的时候会忘记通知,影响正常开标。
因为他每天用Excel登记相应的数据,我用Excel给他设置了定时提醒功能。文末提供原始文件供下载参考。
1.启动Excel,新建文档,命名并保存(如“提醒. xls”)。
2.按“Alt F11”组合键进入VBA编辑状态(如图1所示)。
(图片较大,请拉动滚动条观看)
3.在项目资源管理器的左窗口中,选择VBAProject(提醒. xls)选项,执行插入模块命令,并插入一个新模块(模块1,参见图1)。
4.在右侧的编辑区域输入以下代码:
“Auto _ open()”设置自动宏——auto_open。
申请。ontime value(' 08:00 '),' tx ' '设置提醒时间为——08:33:00(可根据需要修改),设置通话提醒宏为——tx。
申请。ontime value(' 09:30336000 '),' tx ' '再次设置提醒。
末端接头
“Sub tx()”设置一个显示提醒消息的宏(名称应与上述自动运行宏中调用的名称一致)。
Msg=MsgBox('下午通知评委张三、李四、王武参加评标!'、vbInformation、‘快速呼叫’)‘在提醒对话框中设置消息和标题(前面是消息内容,后面是对话框标题,请根据需要输入)。
末端接头
注:上述代码中,英文单引号及其后的字符是对代码的解释,实际输入时可能不需要(见图1)。如果多个提醒宏(tx1、tx2…….)设置,调用时间在自动运行的宏中单独设置,可以实现多条消息的定时提醒。
5.输入完成后,退出VBA编辑状态并保存工作簿文档。
6.以后一上班就启动Excel,打开上面的工作簿文档。设置时间到了,图2所示的提示框会立即弹出,别忘了。原始文件下载