Подскажите, плз, что неправильно пишу в модуле:
Function Filtr5210()
Filtr5210 = "Like ' 5290*' Or Like '5230*' Or Like '5140*' Or Like '5131*'"
End Function
Этот модуль используется как условие отбора в запросе.
Запрос игнорирует условие и выдает пустую строку.
Спасибо
Stepler ^{(щёлк-щёлк!!)}

Просто в запросе по одному из полей табл.:
SELECT ДляИзмБ.*
FROM ДляИзмБ
WHERE (((ДляИзмБ.ComboDeptCode) Like FiltrVce() Or (ДляИзмБ.ComboDeptCode) Like Filtr5210()))
WITH OWNERACCESS OPTION;
Stepler ^{(щёлк-щёлк!!)}

Спасибо, Sfagnum
А как правильно?
Stepler ^{(щёлк-щёлк!!)}

Получается тот же мячик, только в ПРОФИЛЬ...
Stepler ^{(щёлк-щёлк!!)}

Да, нормально...
Если использовать одну составляющую в модуле, то тоже работает. Как добавляю "Or" с доп условием - пустая строка...
Stepler ^{(щёлк-щёлк!!)}

Это равносильно Filtr5210 = "*", т.е выдается весь список целиком...
Stepler ^{(щёлк-щёлк!!)}

В том -то и дело, что просто в конструкторе при условии более расширенном всё работает, проблемма как это условие записать через модуль...
Stepler ^{(щёлк-щёлк!!)}

Это часть строки условия отбора...
SELECT ДляИзмБ.*
FROM ДляИзмБ
WHERE (((ДляИзмБ.ComboDeptCode) Like "5210*" Or (ДляИзмБ.ComboDeptCode) Like "5240*" Or (ДляИзмБ.ComboDeptCode) Like "5140*" Or (ДляИзмБ.ComboDeptCode) Like "3340*" Or (ДляИзмБ.ComboDeptCode) Like "5290*Or" Like "5130*"))
WITH OWNERACCESS OPTION;
Stepler ^{(щёлк-щёлк!!)}

Ну, конечно, это обрезок...простоя "ужал" строку условия. На самом деле там ещё порядка 20-ти параметров по такому же принципу (ДляИзмБ.ComboDeptCode) Like "ПАРАМЕТР*" Or ...
Stepler ^{(щёлк-щёлк!!)}

Ребята, с конструктора запроса всё и началось....
Запросом из табл. делается выборка при определенных условиях - Часть условий: SELECT ДляИзмБ.*
FROM ДляИзмБ
WHERE (((ДляИзмБ.ComboDeptCode) Like "5210*" Or (ДляИзмБ.ComboDeptCode) Like "5240*" Or (ДляИзмБ.ComboDeptCode) Like "5140*" Or (ДляИзмБ.ComboDeptCode) Like "3340*" Or (ДляИзмБ.ComboDeptCode) Like и т.д. (24 условия). Появилась необходимость определять условия отбора через запрос с помощью модуля, иначе говоря модуль содержит варианты условий, но НЕСКОЛЬКО параметром условий с Like. Конечно можно было бы на писать 24 модуля (по каждому параметру) и поставить их как условие в запрос, но это чушь - я хочу одним модулем задать все условия.
В принципе, я задачу решил уже другим способом, но хочеться знать, как нужно писать в модуле (в VBA) строку, содержащую условия с несколькими параметрами!!!
Модераторы-знатоки-асы !!! где вы?
Stepler ^{(щёлк-щёлк!!)}