Originally Posted by
Bradcito
...back on the first part: I know enough code to be more confused: Can VBA be written If month() like {10,11,12} ; since my query is in an active and future query?
You'd still need the Date() function. I'm lazy, so Month(Date()) seems simpler than DatePart("m", date()).
If I'm following, things like this "datTIR <= 1 July, CY-3" could be done with DateSerial(): DateSerial(Year(Date()) - 3, 7, 1).
If you're saying those tests get combined, you might use Select/Case on the month, and then further tests within that.
Code:
Select Case Month(Date)
Case 10 - 12
'code here for that
Case 1 - 3
'code here for that
Case Else
'code here for that
End Select