источник сводной таблицы?

[KL (XL)]

Как посмотреть из меню в XL2003, не помню, но кодом - вот так:

Sub test()
    MsgBox ThisWorkbook.PivotCaches(1).Connection
End Sub

[KL (XL)]

Сообщение от Serge 007

Какая разица? В источник можно так попасть - вопрос уже потом будет "Что с ним делать"?

ЗЫ Кирилл, в днюху отдыхать надо ))

Разница есть: показан будет лишь запрос SQL, а не строка подключения. Обычно (не всегда) адрес файла источника не прописывается в запросе, т.ч. нужно смотреть именно в строке подключения. В XL2007/2010 это легко: Данные > Подключения > Свойства..., а вот с XL2003 запамятовал.

Так ДР был вчера 13/09 И потом, я так отдыхаю.

[Bezdar]

Сообщение от KL (XL)

Как посмотреть из меню в XL2003, не помню, но кодом - вот так:

Sub test()
    MsgBox ThisWorkbook.PivotCaches(1).Connection
End Sub

Все посмотрело, кроме НАЗВАНИЯ запроса.

Люди, Help, SOS!!!

[KL (XL)]

Сообщение от Bezdar

Все посмотрело, кроме НАЗВАНИЯ запроса.

Люди, Help, SOS!!!

Теперь я не понимаю, что вам нужно Нет желания поточнее определить то, что ищем? И заодно версию Excel

Может это:

MsgBox ThisWorkbook.PivotCaches(1).SourceConnectionFile
MsgBox ThisWorkbook.PivotCaches(1).SourceDataFile

[Serge 007]

Сообщение от KL (XL)

Так ДР был вчера 13/09

А написал 14-го
Это что - я всех в заблуждение ввёл? )))

[KL (XL)]

Сообщение от Serge 007

А написал 14-го
Это что - я всех в заблуждение ввёл? )))

Написал 13-го по Мадриду :-) Думаю, для всех это не принципиально :-)

[Bezdar]

Сообщение от KL (XL)

Теперь я не понимаю, что вам нужно Нет желания поточнее определить то, что ищем? И заодно версию Excel

Excel 2003

Ищем SQL-запрос (а как его еще искать, если не по названию? или я чего-то не понимаю?), на основании которого была сделана сводная таблица.

[Bezdar]

Вот как здесь чего понять:
ODBC;DSN=Odabas;UID=gavrikov;APP=Mi crosoftOffice2003;WSID=itegr21;Data base=Odabas;Trusted_Connection=Yes
Кроме создателя запроса и имени компутера.
Я и без этого знала, кто наваял сей шедевр и на каком компутере.

[KL (XL)]

Сообщение от Bezdar

Вот как здесь чего понять:
ODBC;DSN=Odabas;UID=gavrikov;APP=Mi crosoftOffice2003;WSID=itegr21;Data base=Odabas;Trusted_Connection=Yes
Кроме создателя запроса и имени компутера.
Я и без этого знала, кто наваял сей шедевр и на каком компутере.

Все зависит от того, что вы хотите понять, пока это известно только вам
К тому же, по-моему, у нас с вами проблема с терминологией. Есть масса способов создания подключений и у всех все по разному. Как найти SQL-запрос вам посказали давно, но это , похоже, не то, что вы ищите, если верить вашему ответу Serge 007. Еще SQL-запрос можно получить так:

MsgBox ThisWorkbook.PivotCaches(1).CommandText

Вы другие команды, которые я вам дал, проверили? Может тут окажется то, что вы ищете.

MsgBox ThisWorkbook.PivotCaches(1).SourceConnectionFile
MsgBox ThisWorkbook.PivotCaches(1).SourceDataFile

Но вообще боюсь, настало время вешать файл и четко описать (без терминологии), что нужно.

[Bezdar]

Сообщение от KL (XL)

MsgBox ThisWorkbook.PivotCaches(1).CommandText

Вот ОНО! Наконец то. Прегромаднейшее спасибо!!!