请教vba中的DateDiff函数

roych

DateDiff("m", date1, date2）表示只看月份不看天数的。如果非要看天数，应该用DateAdd来表示，当日期达到DateAdd的时候，满足2个月。否则不满足。例如：

1. DateAdd("m",2,#2023/7/26#)

复制代码

然后判断当前日期（比如，Date（）函数）是否等于这个DateAdd。

roych

smilingkiss 发表于 2023-9-8 10:15
谢谢哥！！！
我代码是这样写的：
        criteria = "日期条件"

并不难。用iif判断下就好了：
iif(day(日期)<=day(date()), DateDiff("m", 日期B, date()）, DateDiff("m", 日期B, date()）-1)
这个很容易理解。比如，
date1=#2023-07-26#
date2=#2023-09-03#
date3=#2023-09-28#
由于date2的天数是3，小于26，因此，在原来的基础上减去1，即不满2个月。
由于date3的天数是28，大于26，因此，不需要减去，表示已满2个月。