ник: osmor
ну как вариант...
const c_str SQL as String = "Select * from Таблица"
Me!Spisok.RowSource = c_str SQL & " Where поле = 1"
|
или если запрос без условия сохранить в сохраненном запросе, то можно так:
Me!Spisok.RowSource = currentdb().Querydefs("ИмяЗапроса").sql & " Where поле = 1"
|