I need to Add/Sum a Range(A Column) in Code I know the Top and the Bottom, but do not know how to work with R1C1 Data Here is the code I have all works except the ActiveCell.FormulaR1C1 Line.
When I try to use my reference points it fails.
The TOP and BOTTOM will change based on the data inputed.

How can I use my Top and Bottom Reference Points?

Range(Top & ":" & Bottom).Select
    Range("H" & Bottom + 4).Activate
    ActiveSheet.Cells(Bottom + 3, 8).Formula = "=Sum(bottom & : & top)"

    ActiveCell.FormulaR1C1 = "=SUM(R[-4]C:R[-1]C)"
    Range("H" & Bottom + 4).Select
    Selection.AutoFill Destination:=Range("H" & Bottom + 4 & ":" & "K" & Bottom + 4), Type:=xlFillDefault
    Range("H" & Bottom + 4 & ":" & "K" & Bottom + 4).Select