View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Norman Jones[_2_] Norman Jones[_2_] is offline
external usenet poster
 
Posts: 421
Default Selecting data programmatically

Hi Guest,

Set Rng = Activecell.CurrentReguon



Correcting a typo, try:

'=========
Public Sub Tester()
Dim Rng As Range

Set Rng = ActiveCell.CurrentRegion
MsgBox Rng.Address(0, 0)

End Sub
'<<=========


---
Regards.
Norman