如何自动执行此日期代码,这样我不必每年都更改它?

use*_*954 1 sql excel ms-access vba

如何自动执行此日期代码,这样我不必每年都更改它?

where (Load_Date) >= #12/01/2018#
Run Code Online (Sandbox Code Playgroud)

我需要大于或等于去年12月的日期。

例如在2019年,我需要2018年12月及以后的日期。在2020年,我需要2019年12月及以后的日期。

Gus*_*tav 5

如果可以避免,请勿在VBA中对日期使用字符串处理。

where Load_Date >= DateSerial(Year(Date()) - 1, 12, 1)
Run Code Online (Sandbox Code Playgroud)