View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Alan Beban[_2_] Alan Beban[_2_] is offline
external usenet poster
 
Posts: 783
Default Range as variable

Steph wrote:
Hi. I have a variable defined as below:
var3 = Cells(ActiveCell.Row, "D").Value

How can I convert var3 to be (in laymans terms) ActiveCell.Row, "D" through
BB xlleft

So if active row is 3, var 3 might be D3:G3, if G was the last data point
and H and to the right was blank.

Thanks!


addr = Cells(ActiveCell.row, "IV").End(xlToLeft).Column
Set var3 = Range(Cells(ActiveCell.row, "D"), Cells(ActiveCell.row,
addr))
MsgBox var3.Address

Alan Beban