Would this work for you?

Sub FindQueryAddress()
Dim QueryAddress As String
QueryAddress = ActiveSheet.QueryTables(1).ResultRange.Address(Fal se,
False)
End Sub


HTH
Dana DeLouis


"Belinda" wrote in message
om...
I have a web query on one of the worksheet and I want VBA to obtain
the range in which the web query as populated the results from VBA.

Can you kindly advise how I can determine the range of cells populated
by the web query.

Also, in general when we have a range of values populated on a Excel
worksheet how can we progammatically determine the range of cells
populated in the worksheet.

Thanks
Belinda