The Web query returned no data

  • Thread starter Thread starter TBrewerton
  • Start date Start date
T

TBrewerton

This is how you are able to cancel out this message note the code below
was with help of many people, but the 2 main ones being "Parry" from
MrExcel.com and Dick Kusleika from here on this google group.
The code is as follows!

Public Sub Test()
Dim Qrytbl As QueryTable

For Each Qrytbl In ActiveSheet.QueryTables
On Error Resume Next
Qrytbl.Refresh False
On Error GoTo 0
Next Qrytbl
End Sub

Happy refreshing!

Timothy
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

ODBC error 1
Pivottable refresh problem 1
run-time error '1004' general odbc error 2
Invalid Web Query Error 6
How to re-fresh the import links if it fails? 1
Conflicting VBA Coding 7
Stopping a timer 10
How does one return a specific cell in a web query? 2

Back
Top