Есть: БД в *.mdf-файле на сервере, под SQL.
Надо: вытащить из нескольких таблиц этой БД информацию на xls-лист (например из scl_nakl - organiz, tel, address, из scl_move - name_predm, kolch_predm, из scl_artc - edin_v_upak).
Проблема: как лучше это сделать? Не используя ActiveSheet, не указывая путь к файлу БД (может, у кого-нибудь есть примеры)

Или, хотя бы, как в запрос передать переменную значение которой задается в форме?
---
mYear = Year(txtDate)
mMonth = Month(txtDate)
mDay = Day(txtDate)
mDate = "{ts '" & Trim(Str(mYear)) & "-" & Trim(Str(mMonth)) & "-" & Trim(Str(mDay)) & " 00:00:00'}"

With Sheets(1).QueryTables.Add(Connection:= _
"ODBC;DRIVER=SQL Server;SERVER=dbsrv;UID=sa;PWD="";DATABASE=IGERIA_2003;Address=serv,1433" _
, Destination:=Range("A7"))
.CommandText = Array( _
"SELECT * (текст запроса) WHERE DATE={ts '2003-11-26 00:00:00'}))")
--------

{ts '2003-11-26 00:00:00'} - как вместо этого впихнуть mDate, которая выбирается в форме?