如何知道默认连接或上次使用的连接

Question

我需要找出工作簿中使用的最后一个连接（连接OLEDBConnection）或PivotTable中VBA - Excel中活动的连接名称

Answer 1

Consegui。 seguecódigo：

Sub DescobrirCon()

Dim pvt As PivotTable

For Each pvt In ActiveWorkbook.Worksheets(1).PivotTables 

       Debug.Print pvt.PivotCache.WorkbookConnection 

Next pvt

End Sub