マクロで計算

いつも回答して頂きありがとうございます。

かなり前にここで質問して『連続したデータに、数式を入れる場合は、ループは必要ありません。VBAのコーディングは、記録マクロとは違う種類のものです。』と教えて頂きましたが、自分には全然分かっていなかったようです。
.Cells(5, 4).FormulaR1C1 = "=RC[-2]+RC[-1]"
だけでは、対象の行だけしか出来ませんでした。どんな風に記述すればよいか教えて頂けないでしょうか？宜しくお願い致します。

ループで解決してもいいのですが、ループ無しでの記述を教えて頂けないでしょうか？宜しくお願い致します。

No.4 回答者： MarcoRossiItaly 回答日時： 2014/11/22 07:59

質問文の 1 行を次の 1 行で上書き。

ドット（ピリオド）で始まっているので、漏れなく貼り付け。

.range("d5:d10").formula = "=sum(b5:c5)"

No.3 回答者： chayamati 回答日時： 2014/11/17 11:02

繰り返し(ループ)には Forループと Doループの方法があります。

' for ループ
Sub マクロ1()
Dim i As Integer
For i = 5 To 10 Step 1
Cells(i, 4).FormulaR1C1 = "=RC[-2]+RC[-1]"
Next i
End Sub

' Do ループ
Sub マクロ2()
Dim i As Integer
i = 5
Do While i < 11
Cells(i, 4).FormulaR1C1 = "=RC[-2]+RC[-1]"
i = i + 1
Loop
End Sub

No.2 回答者： okormazd 回答日時： 2014/11/17 10:21

.Range(.Cells(5, 4), .Cells(10, 4)).FormulaR1C1 = "=RC[-2]+RC[-1]"

とか。

No.1 回答者： keithin 回答日時： 2014/11/17 01:45

range("D5:D10").formula = "=B5+C5"

で。