Проблемка с SQL запросом в VBA
 

Привет! Вот появилась такая проблема, пишу SQL запрос в Access в VBA, появляется лшибка, хотя вроде все привильно ((
Dim Zapros As Database
Dim StrSql As String
StrSql = "SELECT [Справочник мат ценностей].[Инвентарный номер],[Справочник мат ценностей].[Заводской номер],[Справочник мат ценностей].[Тип и марка],[Справочник мат ценностей].[Ценность] FROM [Справочник мат ценностей] WHERE ((([Справочник мат ценностей].[Инвентарный номер]) = (Forms.[Движение мат ценностей].[Инвен номер]));"
Zapros = CurrentDb.OpenRecordset(StrSql)
..................
..............
.............
Set Zapros = Nothing

Что неправильно, подскажите