sum関数

range("a1").value = "=sum(a1:a100)"
'　a1からA列のi行までを合計する。
i=100
range("a1")="=sum(a1:a" & i & ")"