Thanks. Does this, as already programmed, have the same effect :
mThisWkSt = DateSerial(Year(mThisWkSt), Month(mThisWkSt), Day(mThisWkSt))
similarly for mThisWkEnd; also for This Month and other options.
Followed with : strSQL = strSQL & "[TrdDt] >= #" & mThisWkSt & "#"
All of the...