I am using the follow code but, nothing happens when I enter a duplicate date
If DCount("*", "tblEmployeeTimeReportDetails", "[Reporting Date] = " & Me.Reporting_Date) > 0 Then
MsgBox "The date you have enter already exists. Please check date and try again.", vbOKOnly + vbExclamation, "Date...