ник: Lukas
Найди отличия в том как я тебе написал, и как ты переделал:
Const SQL_DATE_FORMAT As String="\#mm\/dd\/yy\#"
Dim MaxDate As Date
Dim strFiltr As String
...
MaxDate=DMax("Дата","Таблица")
'Debug.Print MaxDate
strFiltr="Материал='" & Me!Материал & "'"
'Debug.Print strFiltr
strFiltr=strFiltr & " AND [Дата]=" & Format$(MaxDate, SQL_DATE_FORMAT)
'Debug.Print strFiltr
...
|
+ Я всегда использую другое значение константы, с годом из 4 цифр:
Const SQL_DATE_FORMAT As String="\#mm\/dd\/yyyy\#"
