G
Guest
I am running a EXCEL macro to automate web query. It is a simple macro. The
trouble is sometimes it runs fine but other times it gives run time error
1004. Typically when I quit Excel and reload it and rerun it runs. I highly
appreciate any suggestions. Thanks very much in advance
Here is my code:
Sub Try200()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://finance.yahoo.com/q/pr?s=[""Quote"",""Enter Stk Symbols""]", _
Destination:=ActiveCell)
.WebTables = "33"
.BackgroundQuery = True
.TablesOnlyFromHTML = True
.Refresh BackgroundQuery:=False
.SaveData = True
End With
trouble is sometimes it runs fine but other times it gives run time error
1004. Typically when I quit Excel and reload it and rerun it runs. I highly
appreciate any suggestions. Thanks very much in advance
Here is my code:
Sub Try200()
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://finance.yahoo.com/q/pr?s=[""Quote"",""Enter Stk Symbols""]", _
Destination:=ActiveCell)
.WebTables = "33"
.BackgroundQuery = True
.TablesOnlyFromHTML = True
.Refresh BackgroundQuery:=False
.SaveData = True
End With