VBA代码中怎么写连加

excel VBA代码中如果几个cells要连加怎么写啊??
但我要用i循环 用字母怎么循环啊?

抱歉 我意思是i循环别的 比如i=1时候 赋A1:A100 i=2时候 B1:B100

可以借用EXCEL的求和公式:
如:
[c1] = Application.WorksheetFunction.Sum(Range("a1:b5"))

可以对单元格区域a1:b5求和,并把结果写在C1单元格

如果直接写的话,别忘了在单元格两边加上中括号:
如:
A=[A1]+[A3]+[A5]
可以把A1,A3,A5的和赋值给变量A

补充回答:
下面代码可以把A1到A100的和赋值给变量A

dim i ,a as long
a=0
for i=1 to 100
a=a+cells(i,1)
next i

对于VBA,一般尽量避免用循环的方法:它的效率是比较低的!

楼主什么意思?这有什么区别么?CELLS函数行和列用的都是数字,直接用就行了
最简单的方法:用循环嵌套

dim i,j,a as long
a=0
for j=1 to 10
for i=1 to 100
a=a+cells(i,j)
next i
next j

连续区域也可以用for each循环:
Dim cell1, a As Long
a = 0
For Each cell1 In Range("a1:c100")
a = a + cell1
Next
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-07-01
如果你是直接在excel表格里写,比如,在D1里写a1+b1+c1的和。就这么写。
在D1单元格里写上
=a1+b1+c1
如果是在vba代码里写。则
变量 x=sheet1.cells(1,1)+sheet1.cells(1,2)+sheet1.cells(1,3)
。。。就这么写啊!!
相似回答