ник: ludmil
В запросе
поле таблицы [отделение] имеет условие отбора вида [Forms]![заставка]![Поле337] это текст;
есть вычисляемые поля
выр6: DateSerial(Year(Date());1;11)
выр5: IIf(Forms![ВСЕ ОТЧЕТЫ]!Поле0<[выр6];[выр6];Forms![ВСЕ ОТЧЕТЫ]!Поле0) это дата краткий формат
При работе непосредственно с запросом формируется все корректно.
Если работаю в Vba
Set qdf = dbs.QueryDefs("имя")
qdf.Parameters("[Forms]![ВСЕ ОТЧЕТЫ]![Поле0]") = [Forms]![Все отчеты]![поле0]
qdf.Parameters("[Forms]![заставка]![Поле337]") = [Forms]![заставка]![Поле337]
Set R = qdf.OpenRecordset(dbOpenForwardOnly)
Do Until R.EOF
… идет выборка данных и разнесение в нужную таблицу
R.MoveNext
Loop
R.Close
Похоже что именно Выр5 работает не так или не верно оформляю передачу параметров
Что не так ,подскажите пожалуйста.