Hello all!
I'm trying to find in a table column the 15th day of the current month and I don't know why the following code doesn't work:
After running the code, there is no error returned, but just doesn't do the job.Code:Dim rs As RecordsetSet rs = CurrentDb.OpenRecordset("MMSA", dbOpenSnapshot, dbReadOnly) rs.FindFirst "StartingDate" = DateSerial(Year(Now()), Month(Now()), 15) If rs.NoMatch Then DoCmd.OpenForm "NEW" Else MsgBox "No entry" End If
What am I doing wrong?
Thx!