Ошибка в запросе

Добрый день, подскажите где ошибка кроется?

Set db = CurrentDb()
Set rs = db.OpenRecordset(" select dbo_UPR_1214.kod_upr, dbo_StrEd_18.nStrEd  FROM dbo_UPR_1214, dbo_StrEd_18, 
[Excel 12.0 xml;HDR=Yes;IMEX=1;DATABASE=" & Me.Form.l1.Value & "].[Лист1$] AS Ex Where dbo_UPR_1214.kod_upr = Ex.[Код управления] ")

Выходит сообщение что слишком мало параметров. Требуется 1.
Проверил поля в таблице, такое точно есть.
Имя столбца copy-paste из файла

Убрал из selecta и from dbo_StrEd_18

Все уже перепробовал, не вижу ошибки

Для начала соберите свой SELECT в переменной и посмотрите на результат в окне отладки.
Если не найдете ошибку - вставьте полученный текст в конструкторе запроса и запустите его.
Акс вам расскажет, какого параметра не хватает.

В акс вставлял запрос, требует чтобы я ввел значение Ex.[Код управления], а этого быть не должно потому что значение должно браться из документа

ЧипдДейл,

Set db = CurrentDb()
Set rs = db.OpenRecordset(" select dbo_UPR_1214.kod_upr, dbo_StrEd_18.nStrEd  FROM dbo_UPR_1214, dbo_StrEd_18, 
[Excel 12.0 xml;HDR=Yes;IMEX=1;DATABASE=" & Me.Form.l1.Value & "].[Лист1$] AS Ex Where dbo_UPR_1214.kod_upr =" &  Ex.[Код управления]")

Пропущены апострофы, но даже если добавить их эта запись не работает.
Если записано '& Ex.[Код управления] &' то работает, но говорит что результат нулевой, это не правильно потому что в базе есть такой код управления

ЧипДейл
базе есть такой код управления

но по рисунку --у вас похоже текстовый тип данных

dbo_UPR_1214.kod_upr ='" &  Ex.[Код управления] & "'")

Все верно, текстовый тип данных, но такая запись вызывает ошибку несозданного объекта. Скорей всего из-за того что '"& &"' то подразумевает что будет значение какого-либо объекта.

Наверное важное уточнение будет, если взять другой документ который содержит такие же поля то все работает.

ЧипдДейл

Добрый день, подскажите где ошибка кроется? Set db = CurrentDb() Set rs = db.OpenRecordset(" select dbo_UPR_1214.kod_upr, dbo_StrEd_18.nStrEd FROM dbo_UPR_1214, dbo_StrEd_18, [Excel 12.0 xml;HDR=Yes;IMEX=1;DATABASE=" & Me.Form.l1.Value & "].[Лист1$] AS Ex Where dbo_UPR_1214.kod_upr = Ex.[Код управления] ") Выходит сообщение что слишком мало параметров. Требуется 1. Проверил поля в таблице, такое точно есть. Имя столбца copy-paste из файла

Jet скушает твой запрос, если сначала прилинковаться к Excel-ской таблице (или сделать сохраненный запрос на него же)