Hi,

Your line of code can be simplified to

ActiveCell.Resize(21).Select

and for a column

ActiveCell.Resize(, 21).Select

My usual caveat is that no matter what you trying to do it's extremely
unlikely you need to select to do it

--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.


"puiuluipui" wrote:

Hi, i have this code that will select from active sheet 20 cells below, on
the column.
can this code be made to select 20 cells to the right, on row?

Range(ActiveCell, Cells(ActiveCell.Row + 20, ActiveCell.Column)).Select

Can this be done?
Thanks!