Доброго дня, всем!

Подскажите, пожалуйста, можно ли каким-либо образом получить список соединений в активной книге. то есть перебрать их. Что-то похожее как написано внизу  

Спасибо!

Добрый день!  
Вопрос такой, может кто сталкивался.  
Обновляю сводную посредством макроса, источник подключений некая БД. Так вот при каждом запуске макроса (то есть обновлении сводной) все время создается новое подключение, а предыдущие благополучно остаются висеть, но уже нигде и не используются. Вопрос: как обновлять сводную в пределах одного подключения?  
 
Обновление происходит следующим образом:  
 
ActiveWorkbook.PivotCaches(1).CommandText = SQL 'Где SQL - это какой-то запрос