Excel VBA - 更正用于汇总多行的VBA代码

Question

在VBA中使用以下公式编码的正确方法是什么？我需要在第6列中连续总计5列，并且总共7行。

Range("G21").Select
ActiveCell.FormulaR1C1 = "=SUM(RC[-5]:RC[-1])"
Selection.AutoFill Destination:=Range("G21:G27"), Type:=xlFillDefault