Hi Jason,

These two lines will select from the active cell, to the
end of the data range(i.e. last cell that has data, then
the same coloumn wise.

Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select

HTH's.
Russ.

-----Original Message-----
I am trying to write some code that will look at the
uppermost cell in a range of cells, and then select the
range of cells that belong to the same bunch of data
(i.e. all the way to the right of the initial cell until
the range ends, and all the way to the bottom of the
initial cell until the range ends). Any help would be
greatly appreciated. Thanks.

Jason
.