Thanks Rick..

If this post helps click Yes
---------------
Jacob Skaria


"Rick Rothstein" wrote:

This is much easier to do using the Resize property of the Range object (the
ActiveCell in this case)...

ActiveCell.Resize(11, 7).Select

where the 11 and 7 are one more than the number of rows and columns to add
(the one being so that the 10 and 6 are in addition to the ActiveCell's row
and column).

--
Rick (MVP - Excel)


"Jacob Skaria" wrote in message
...
Try this.....it was too long...

Range(Cells(ActiveCell.Row, ActiveCell.Column), _
Cells(ActiveCell.Row + 10, ActiveCell.Column + 6)).Select


If this post helps click Yes
---------------
Jacob Skaria


"J.W. Aldridge" wrote:

Mr. Jacob, that didn't work...