如何删除此工作簿中未使用的QueryTable连接？
我只打开了一个工作簿（当时没有打开其他工作簿），并注意到列出了一堆数据连接。 经过进一步的调查，显示这些连接并没有被“用在这个工作簿中”（再一次，奇怪的是我只打开了这个工作簿，所以如果这里没有使用连接，他们还用到了什么地方？）
使用下面的代码，它显示该工作簿中的所有工作表中的QueryTables.Count都是0。 那么有没有一种方法来编程（VBA，而不是C＃），以删除连接？ 真的会讨厌单独和手动删除连接
Dim Worksheet As Object For Each Worksheet In ThisWorkbook.Worksheets Debug.Print (Worksheet.QueryTables.Count) Next 也许
Sub deleteConnections() Dim conn As WorkbookConnection For Each conn In ActiveWorkbook.Connections conn.Delete Next conn End Sub
这删除了一堆实际上在我的工作簿中处于活动状态的连接。 还应该做不使用的连接技巧。