Здравствуйте. Делаю запрос в коде на VBA в БД Аксесс:

Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("SELECT Код FROM НазначенияСотрудникам Where (ТабНомер=" & Me.Сотрудник & ") AND (Документ=" & Me.Документ.Value & ") AND ([Вид работы]='" & Me.ВидРаботы.Value & "')", dbOpenDynaset, dbSeeChanges)

При выполнении кода велезает ругательство: Слишком мало параметров. Требуется 1
на строке

Set rs = CurrentDb.OpenRecordset("SELECT Код FROM НазначенияСотрудникам Where (ТабНомер=" & Me.Сотрудник & ") AND (Документ=" & Me.Документ.Value & ") AND ([Вид работы]='" & Me.ВидРаботы.Value & "')", dbOpenDynaset, dbSeeChanges)

что не так? какого тут параметра не хватает? помогите пожалуйста. В отладчике проверял - значения всех контролов формы присваиваются...ТабНомер и Документ - числовые, Вид работы - строка, выбирается из значений комбобокса

http://www.sql.ru/forum/1238859/zapros-v-aksess-slishkom-malo-parametrov