Autosum type macro with array formula

[rondragon]

Hi,

I'm writing my first macro (oohh..) which essentially works like autosum but instead of sum I'm using an array formula. So far I have:

ActiveCell.Select
Selection.FormulaArray = "=10*LOG10(SUM(10^(R[-10]C:R[-1]C/10)))"

where R[-10]C:R[-1]C is the range of cells but I would like the range to be arbitrary as I don't know the number of values in the range - much like autosum.

I know there has been many posts with similar queries but I'm a VB novice so I have not been able to adapt them for my particular needs.

Thanks in advance.

ron