Re: insert formula in last cell

One way:

Range("C" & Rows.Count).End(xlUp).FormulaR1C1 = _
"=SUBTOTAL(9, R2C:R[-1]C)"

In article <OlN$Ja3YFHA.2420@xxxxxxxxxxxxxxxxxxxx>,
"J_Gold" <Jason_A_Gold@xxxxxxxxxx> wrote:

> Hi - I would like to be able to subtotal a column of numbers using the
> following formula:
>
> =subtotal(9, C2:?) where ? is the last cell that contains data. I would like
> to
> insert the formula in the cell below the last row of data.
>
> The data to be summed are in reports that I download daily and where the
> number
> of rows that contain data will vary. I've tried to figure out how to do this
> with a macro, but I'm stumped. Any help is appreciated.
>
> Cheers,
>
> Angela
.

Loading