Greg
One way:
ActiveCell.Value=Application.Sum(Range(Cells(5,Act iveCell.Column),(Cells(ActiveCell.Row-1,ActiveCell.Column)).
HTH Otto
"GregR" wrote in message
...
I have a macro, where I am trying to do a sum from row 5 to the active
cell.
How do I designate the range. Here is what I have;

Activecell.formula="sum(range(cell(5,0),cell(activ ecell,0))", but it gives
me a compile error. TIA

Greg