本文于2023年7月8日首发于本人同名公众号：Excel活学活用，更多文章案例请搜索关注！

☆本期内容概要☆

VBA 定时循环执行代码

大家好，我是冷水泡茶，今天在网络论坛上看到一个求助贴：

楼主的表格是这样的：

楼主需求的方案1，没有搞明白，不打开表如何给出提示？就好像你不打开电脑能给你提示？这个咱就不管它了。

楼主需要的方案2，到时间自动弹窗提示，感觉应该可以实现，关键问题是要重复执行检查当前时间与“跟进时间”的代码。

我想起我们分享过的Excel VBA 随机生成颜色/设置单元格颜色中的方法，根据给定时间间隔，自动执行一个过程。于是，经过一番操作，实现代码自动运行，根据要求给出提示的效果：

运行使用说明：

1、表格打开时，自动激活提醒。可以设置间隔时间来调整提醒频率。

2、在程序运行时，右上有个命令按钮cmdStart，它显示一个秒表，该秒表达到100时归零，从0继续读秒。

3、当程序在运行过程中，会按设置的时间间隔来检查“重点跟进“表H列登记的时间，当它小于等于当前时间，且I列为空时，会将该记录信息输出到MsgBox消息框。

4、将被提醒记录行字体设为红色，如果已对该记录作出处理，不需要再提醒时，在I列写上“Y"或其他任意字符。则在下一次提醒中，会将该记录排除且把字体颜色标为灰色。

5、如果新的提醒时间到了，但没有需要处理的记录（H列跟进时间大于当前时间，或者虽小于或等于当前时间，但I列不为空），Msgbox消息框会显示"暂无跟进项目"

6、点“停止”按钮，程序停止，上面的秒表显示为“启动”。

7、点“启动”，重新启动自动定时提醒......

程序代码：由于代码加上解释内容较多，我放在第二条。

好，今天就到这吧。欢迎点赞、留言、分享，谢谢大家，我们下期再会。

☆往期合集☆【2023年3月】【2023年4月】【2023年5月】【2023年6月】

☆猜你喜欢☆

Excel VBA 电子发票管理助手

Excel VBA 收费管理系统

Excel VBA 中医诊所收费系统

Excel VBA 文件批量改名

Excel VBA 酷炫的日期控件

Excel VBA 动态添加控件

Excel VBA 最简单的收发存登记系统

Excel 固定资产折旧计提表

Excel VBA 输入逐步提示

Excel 公式函数/查找函数之LOOKUP

☆我是安利达人☆

我的小店

自用产品，强烈推荐！

白茶牙膏

洗洁精

洗衣液

本文于2023年7月8日首发于本人同名公众号：Excel活学活用，更多文章案例请搜索关注！