Хотелось бы узнать, может ли кто-нибудь помочь мне с моим кодом, продолжать получать сообщение об ошибке поиска по дате в таблице, но мой текстовый поиск отлично работает с отделом и производителем.Date_Due в формате даты / времени, ошибка 3464 Несоответствие типов данных в выражении критериев.
Private Sub Date_Due_Search_AfterUpdate()
Dim Date_Duelist As String
Date_Duelist = "Select * from Equipment_List where ([Date_Due] = '" & Me.Date_Due_Search & "')"
Me.Equipment_List_subform.Form.RecordSource = Date_Duelist
Me.Equipment_List_subform.Form.Requery
End Sub