louislau2010 发表于 2013-9-27 15:25 
是每列,上面数据只是一个日期的数据,如果再加上其他日期怎么算呢?
不用vba的算法是用sum求和,第一到第20行就行了,然后横着拖过去,就是对多列的求和了,
例如,你可以在最后一行第一列的单元格中写:=sum(a1:a20),然后横着拖过去,就是对多列的
用vba的话也很简单,两个循环就行了,关键是求出来的和你存在哪里?
附vba:
Sub cc()
For j = 1 To 20
For i = 1 To 20
cells(50,j)= Cells(i, j) + a '这里我把和放在了对应列的50行
Next
Next
End Sub