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

Hi Belinda;

After the recordset has returned use this code.

'Select a cell somewhere in the range probably

Range("A1").Select

'Then use the current region method

ActiveCell.CurrentRegion.Select

'Then get the address

MyRange = Selection.Address

'The values for Address are read only.

Thanks,

Greg

-----Original Message-----
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
.

You don't have to select of course.

set rng = Range("A1").CurrentRegion
msgbox rng.Address(external:=True)

--
Regards,
Tom Ogilvy

"Gjones" wrote in message
...
Hi Belinda;

After the recordset has returned use this code.

'Select a cell somewhere in the range probably

Range("A1").Select

'Then use the current region method

ActiveCell.CurrentRegion.Select

'Then get the address

MyRange = Selection.Address

'The values for Address are read only.

Thanks,

Greg

-----Original Message-----
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
.

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