ник: osmor
help по Querydef
если нужно создать запрос
Currentdb.CreateQueryDef("ИмяЗапроса","текс запроса")
Если изменить существующий
currentdb.QueryDefs("ИмяЗапроса").SQL = "Текст запроса"
Открыть можно Docmd.Open .... не помню вроде OpenQuery
или подсунуть как источник строк формы
или выгнать в Excel