refreshing web query

[Guest]

I placed web query with the following commands (part of the macro)

With ActiveSheet.QueryTables.Add(Connection:="URL;" & qurl,
Destination:=DataSheet.Cells(a, 5))
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With

Then i placed another macro it worked well.
sub mac2()
activeworkbook.refreshall
end sub

But the following macro is not worked well it skips the refresh command and
goes
to next line immediately without refreshing

sub mac2()
activeworkbook.refreshall
activeworkbook.save
end sub

What is wrong with the macro?

 

[Don Guillett]

Assuming it worked when you created it, try
Sheets("sheet1").QueryTables(1).refresh
or
activesheet.QueryTables(1).refresh

 

[Guest]

did this work?

Assuming it worked when you created it, try
Sheets("sheet1").QueryTables(1).refresh
or
activesheet.QueryTables(1).refresh

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(e-mail address removed)