Hi,

I just want to select a one-column-range starting at the selected cell
and stretching out until a row specified in variable x.
There has to be a better way than this:

Range(ActiveCell.Address & ":" & Left(Replace(ActiveCell.Address, "$",
""), 1) & x).Select

What am I missing?

Thx
Robin