Hi all
Can anyone tell me why I get an error message when trying to run this code? I get a "Type Mismatch"??
Both Ref and Day are TEXT
Code:Private Sub Ref_DblClick(Cancel As Integer) Dim sWhere As String sWhere = "[Ref] = '" & Me.Ref & "'" And "[Day] = '" & Me.Day & "'" DoCmd.OpenForm "frmChecklistSingle", , , sWhere End Sub