Forum Discussion

Copper Contributor

Jan 26, 2018

Solved

Office 365 - Delete data connections in one go

Hi all, first post here as recommended by Philip Pio from Microsoft (https://answers.microsoft.com/en-us/msoffice/forum/msoffice_excel-mso_win10-mso_365hp/office-365-delete-connections-in-one-go/3011...

excel

Pablo R. Ortiz

Feb 04, 2018

you can use this vbscript in a Macro button:

Sub Remove()
Dim connection As WorkbookConnection
Dim query As WorkbookQuery
On Error Resume Next
For Each connection In ThisWorkbook.Connections
    connection.Delete
Next
For Each query In ThisWorkbook.Queries
    query.Delete
Next
End Sub

Pablo R. Ortiz

Iron Contributor

Feb 04, 2018

you can use this vbscript in a Macro button:

Sub Remove()
Dim connection As WorkbookConnection
Dim query As WorkbookQuery
On Error Resume Next
For Each connection In ThisWorkbook.Connections
    connection.Delete
Next
For Each query In ThisWorkbook.Queries
    query.Delete
Next
End Sub

Jaron Rosegg

Copper Contributor

Feb 06, 2018

Hi P.R. Ortiz, yes, that would work.

Pablo R. Ortiz
Iron Contributor
Feb 06, 2018
Is the best workaround you will find. Please mark my reply as best response if it helped. Thanks.
- Jaron Rosegg
  Copper Contributor
  Feb 06, 2018
  The thing is, that does not help with the case where you want to select multiple, but not all, queries and connections...
  - Pablo R. Ortiz
    Iron Contributor
    Feb 06, 2018
    In Get Data -> Edit queries you can select several queries for deletion, and the same for connection permissions in Get Data -> Data Source settings