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?