るきお様、魔界の仮面弁士様、せっかく、ご返答いただきましたが、よく判りませんでした、勉強不足で申し訳ありません、「Ｒ１Ｃ１参照形式」で、新しいマクロの記録をしましたが、やはり、range("A1:D1")と記録されてしまうので、縦方向の数値の集計のマクロは
Dim seru As String
Dim i As Integer
Dim kazu As Integer
Dim goukei As Integer
For i = 1 To 100
seru = "A" & i
kazu = Range(seru).Value
goukei = goukei + kazu
Next i
と書けばＡ列の１～１００までのセルの値の合計は、計算出来ますが
横方向の集計の場合は、Ａ、Ｂ、Ｃだと、Ｆｏｒ～Ｎｅｘｔが使えないので、「Ｒ１Ｃ１参照形式」なら、出来ると、思っていましたが、やり方が、判らないので、他の方法を考えてみます、お手数を、おかけしました