В сводной таблице в exel Запрос sql:

SELECT ОстатокПоДоговору.Конрагент, ОстатокПоДоговору.НомерДоговора, ОстатокПоДоговору.ДатаДоговора, ОстатокПоДоговору.КБК, ОстатокПоДоговору.КОСГУ, ОстатокПоДоговору.СуммаДоговора, ОстатокПоДоговору.СуммаПлатежа
FROM `C:\Dog\Dog`.ОстатокПоДоговору ОстатокПоДоговору

Как написать вместо четко прописанного пути: C:\Dog\Dog "ПАПКА В КОТОРОЙ НАХОДИТСЯ ФАЙЛ"?
В аксесе: CurrentProject.Path & "\", а ка это прописать правильно в примере?

Не разберусь:


При открытии файла вызываем окно для определения пути данной базы:Dim pyt as String
Dim dlgOpen As FileDialog
Dim varItem As Variant

Set dlgOpen = Application.FileDialog(DialogType:=msoFileDialogOpen)
' DialogType:=msoFileDialogSaveAs
'DialogType:=msoFileDialogOpen
With dlgOpen
.AllowMultiSelect = True
If .Show = -1 Then
For Each varItem In .SelectedItems
pyt = varItem
Next varItem
Else
' Нажали отмену.
End If
End With

Дальше отправляем значение переменной pyt в SQL:


SELECT Учреждения.Код, Учреждения.НаименованиеУправления, Учреждения.Район, Учреждения.КБК
FROM `C:\Balans2007\Borskoe`.Учреждения Учреждения
КАК в sql прописать эту переменную?

Не разберусь:


При открытии файла вызываем окно для определения пути данной базы:Dim pyt as String
Dim dlgOpen As FileDialog
Dim varItem As Variant

Set dlgOpen = Application.FileDialog(msoFileDialogOpen)
With dlgOpen
.AllowMultiSelect = True
If .Show = -1 Then
For Each varItem In .SelectedItems
pyt = varItem
Next varItem
Else
' Нажали отмену.
End If
End With

Дальше отправляем значение переменной pyt в SQL:


SELECT Учреждения.Код, Учреждения.НаименованиеУправления, Учреждения.Район, Учреждения.КБК
FROM `C:\Balans2007\Borskoe`.Учреждения Учреждения
КАК в sql прописать эту переменную вместо `C:\Balans2007\Borskoe` ?

Может кто-нибудь откликнится?

Таблицы с данными из базы не видно. Сразу формируется сводная таблица. И при открытии я сама должна выбрать путь к базе.
Посмотрите пример

Уважаемые участники форума!
Может кто сталкивался с такой проблемой?