Another related question, please.

How do i resize the selection from both ends (top and bottom)? For example,
if the selection is from A1 to A10, how can i reduce it one cell from the top
and one cell from the bottom, so that it becomes from A2 to A9?

Again i need this macro to be usable for any selection in any other column.

Many thanks in advance
Tendresse

"Vasant Nanavati" wrote:

Range(ActiveCell, ActiveCell.End(xlDown)).Select
__________________________________________________ ______________________

"Tendresse" wrote in message
...
I need help with a macro that expands the selection from the ActiveCell to
the last populated cell in the same column. For example:

if Cell A10 is the last populated cell in column A, and the ActiveCell is
A2, i want the macro to expand the selection to be from A2 to A10.

The active cell will not necessarily be in column A. So i want the macro
to
be valid for use on any column.

I'm using Excel 2003.

Many thanks
Tendresse