Yes exactly.
i am looping with workbookqueries so only way to get to this is looping through workbook connections?![]()
Sub RefreshAllOutputQueries() Dim wbQr As WorkbookQuery For Each wbQr In ThisWorkbook.Queries If wbQr.Name Like "*Out" Then wbQr.Refresh False End If Next wbQr End Sub
Best,
Jacek
Bookmarks