Query on Excel sheet returns error, how to prevent error message

I tried to use VBA to refresh a query (on another excel spreadsheet) wit the code below:


Application.ScreenUpdating = False
On Error Resume Next

Selection.ListObject.TableObject.Refresh
ActiveWorkbook.Connections("Query - tbl_PRODLIST").Refresh

Application.ScreenUpdating = True


If the workbook is opened of a computer that does not have the spreadsheet from which the refresh is necessary, the refresh should not return an error but continue without refreshing the query. How can I prevent the error message ("Connection can not be refreshed") from appearing on screen?
Error checking is not my strongest point in VBA.

Thank for any help regarding this issue.

Ron

Hi dflak,

Tried that before but I still get the same error message; a [Data source error}.

Ron

Hi dflak,

This does not work either, still get the same [Data source error]. The second line causes the error and returns with a dialog window with the [Data source error].

Hi dflak,

I tried to implement your code example but this is the error message I get:

Attachment 622623