Hallo,

if there are the following value in a column
23
21
32
Sum

and I select with the mouse the area with first three rows (only the
numerical values). Which command can I use to determine the rangeadress in a
macro?

The Command determine the whole range, including the string in the last
line. This is not that I need.
..Range(ActiveCell.Address(0, 0) & ":a" & .Cells(Rows.Count,
"A").End(xlUp).Row)

Thanks,
Ben