Программное выполнение SQL запроса на VBA Access

[chandrasecar]

Как результат запроса на выборку записать в переменную?
Примерно такой запрос:
"SELECT SUM(tblUnitWork.Стоимость) FROM tblUnitWork WHERE tblUnitWork.R=1"
Здесь мы считаем сумму, так что результат будет один.Ккак записать результат этого запроса в переменную?

[b00s]

используйте Recordset

[Sparxy]

если поразвернутее то можно написать
Dim dbs as DAO.Database
Dim rst as DAO.Recordset
Dim Summa as Long
Set rst = dbs.openrecordset (твой select)
Summa = rst![стоимость]

должно работать