vb中如何对某一列求和？

[abc0274]

我现在相对excel中一列求和，其中行数是改变的
xlssheet.Cells(no1, 2) = xlssheet.Application.WorksheetFunction.Sum()
其中no1代表最后需要写入数据的行数。
假如从第cells（5,2)一直加到cells（no-1,2），sum中该如何写呢？
谢谢！

[hupeng213]

打开EXCEL，录制宏，做上述操作，
然后编辑宏，里面就有原代码，EXCEL里面怎么写的，基本上可以原封不动搬到VB里面用。

[Rose2007]

Sheet2.Cells(23, 34) = Str(totalCH1)　'totalCH1 是在前边给表格赋值时单个加的和
''same as
' Sheet2.Range("AH23").Value = Application.WorksheetFunction.Sum("AH8:AH22")


或者如楼上录制宏

[abc0274]

宏好像是对确定的行还可以吧。可是我的行数不是确定的，不同的时候，数据的行数不一样。谢谢！

[abc0274]

帮忙呀！

[恋上微笑的天使]

宏 不错的东西。

有价值。

[snowwolf80]

for循环就可以，定义好相应的变量就可以

[abc0274]

还是用的宏，已解决！谢谢大家的帮忙了！