Excel教程

Excel函数
Excel技巧

【EXCEL教程】应收账款自动弹窗提醒

当前位置:网站首页 > Excel教程

【EXCEL教程】应收账款自动弹窗提醒

* 来源: 【office教程学习】 * 作者: 【EXCEL教程】 * 发表时间: 2020-04-04 19:29:23 * 浏览: 343


小伙伴们还记得我们【1-让应收账款显示提前预警】课程吗?

学会这技能以后很多同学都说麻麻再也不用担心我会忘记提醒老板收钱


如果我告诉你,今天教你玩的是打开文件就弹窗提醒,你会不会有动力看去呢


其实这对我们来说,这要求根本不是事儿,因为我们会VBA啊!


方便大家理解,原数据表做一个小的修改,只保留一列提示列,里面用的是函数公式来写的。



函数的意思是把最近5天的就要显示出来了,


规则明白以后,就开始来写代码吧!



代码写好了,先简单解释一下吧


从数据表里能看数据从第4行开始到75行结束的,所以 for xrow=4 to 75


日期在数据表的d列,所以 用 Cells(xRow, "G").Value 来表示日期所在单元格


Date 返回系统当前日期,


mDay = Cells(xRow, "G").Value Date 在工作表里写公式的话是 =G4-TODAY()  


用单元格的日期减系统日期也好理解,算出来赋值给mDay


代码图里都有注释就不做太多解释了,最容易抄错的地方是 第二个循环里的字符串拼接,注意 & 两边都要有空格哟。代码换行符 下划线 _ 前面也要有空格。


原理明白了,代码也写好了,那就开始体验儿时的乐趣看动画片吧。


第一集:效果演示

好啦,这一集效果看到了,是不是有点酷炫呢


有的小伙伴会问:公式设置的是5天的,vba里只设置了3天的


因为公司里要收的钱太多了,提示5天的话,消息框都装不下了,所以打个折吧。


PS:可以根据自己喜好更改提示信息,前题是得先把代码吃进肚子消化了并且吸收了才行,若是吃不下、消化不良或吸收不好,记得来找我们诊断一下哟。


测试没问题了,就要开始做记它自动化的设置了,这个设置还是接着看动画片吧!


第二集,设置自动化

设置好以后,一定记得保存哟(按ctrl +s),接下来就是关闭文件,重新打开文件啦!!


继续看动画片吧(这一集是大结局哟,千万别走神!!!!!!!!

若是第一次使用宏的话,会有个开启宏的提示,版本不同提示不会,注意看一下。


这样的效果比起用眼睛去一个个的找更方便吧!!!!


这是基础教程,不会做得太漂亮(借口是要找的),学会以后,可以继续深入优化,让它更加智能哟!!!


下一季会更加精彩(打开任意Excel就弹窗,觉得还不过瘾再送个打开任意word也弹窗行不行?)


有没有小兴奋,小冲动,瞬间感觉自己也会vba?没错,vba其实也可以很简单(因为这些功能本身就简单)


使用wps的小伙伴们,wps是不能用vba的哟(土豪版请无视