我有一个有 8 个连接的 excel 电子表格。我想知道哪个连接字符串对应于 excel 中的哪个数据表/数据透视表。2007 年或 2010 年方法中的解决方案很好。
这可能吗?
可以使用“数据”选项卡。
尝试这个:
-- 单击Data选项卡中的Connections以打开Workbook Connections对话框。
-- 单击列表中的一个连接。
-- 点击链接:点击此处查看所选连接的使用位置
这也可以从 VBA 中实现。这个查询只是枚举它们。
PivotCache.Refresh
您可以使用或轻松修改此示例以刷新查询QueryTable.Refresh
。
Sub ShowAllQueryConnectionStrings()
Dim oSheet As Excel.Worksheet
For Each oSheet In Application.ActiveWorkbook.Sheets
Dim oTable As Excel.QueryTable
For Each oTable In oSheet.QueryTables
Debug.Print "QueryTable " & oTable.Name & ": " & oTable.Connection
Next
Dim oPivot As Excel.PivotTable
For Each oPivot In oSheet.PivotTables
Debug.Print "PivotTable " & oPivot.Name & ": " & oPivot.PivotCache.Connection
Next
Next
End Sub