You don't need to open Access. You can do it in the background using
DAO or ADO. For example:

Dim db As DAO.Database
Dim rs As Recordset
Dim qdf As QueryDef

Set qdf = db.QueryDefs("Query1")
qdf("ID") = 101
Set rs = qdf.OpenRecordset

For the above to work, Microsoft DAO x.xx Object Library must be
checked using the VBE menu Tools | References. For more info, see
he
http://www.erlandsendata.no/english/...php?t=envbadac

Hth,
Merjet