I changed the name of MS Access file and then changed it back.

I have a spreadsheet that is extracting data from the DB

I believe I clobbered the links. The code fails on qryTab.refresh

Set wks = Worksheets("Data")
For Each qryTab In wks.QueryTables
qryTab.Refresh
Next qryTab


Can you tell me how to restore the links?