求和

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1                4,072.00        -104.00
2                4,061.00        5.00
3                3,855.00        -229.00
4                3,789.00        -51.00
5                3,684.00        -54.00
6                3,401.00        -108.00
7                3,251.00        -77.00
8                2,845.00        2.00
9                2,569.00        806.00
10                2,487.00        -63.00
11                2,378.00        134.00
12                2,359.00        -51.00
13                2,105.00        -6.00
14                2,049.00        -154.00
15                2,027.00        2.00
16                1,994.00        -43.00
17                1,969.00        12.00
18                1,724.00        -5.00
19                1,683.00        -49.00
20                1,681.00        -27.00
21                1,554.00        1.00
22                1,312.00        32.00
23                1,276.00        -252.00
24                1,219.00        -91.00
25                996.00        -119.00
26                903.00        1.00
27                866.00        386.00
28                775.00        -5.00
29                718.00        -184.00
30                671.00        -7.00
31                639.00        0.00
32                385.00        -134.00
33                313.00        0.00
34                271.00        0.00
35                220.00        0.00
36                173.00        -7.00
37                158.00        0.00
38                129.00        0.00
39                51.00        -1.00
40                41.00        0.00
41                40.00        -5.00
42                33.00        0.00
像上述数据取前二十个数据的和，怎么做呢？VBA代码怎么写呢？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：VBA 怎么做

对每列的前20求和还是按每行3个算，数到20求和

fftangwen 发表于 2013-9-27 14:52
对每列的前20求和还是按每行3个算，数到20求和

是每列，上面数据只是一个日期的数据，如果再加上其他日期怎么算呢？

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

像 cu  xxxx
    cu   xxx
....
    zn    xxxx
    zn   xxx
...
前面的是名称，后面的是数据，对按名称汇总怎么做呢？VBA,R,MATLAB,SAS,有知道的请告知，谢谢！

上个附件，或者把问题说明白。

菜籽油N 汇总                32        1
早籼稻N        上海分部        50        0
早籼稻N        长沙分部        2        0
早籼稻N        北京分部        0        5
早籼稻N 汇总                52        5
强麦N        郑州分部        0        0
强麦N        株洲        0        2
强麦N        南宁分部        6        12
强麦N        长沙分部        1        0
强麦N 汇总                7        14
只想读取汇总数据，有很多张表格怎么办呢？

用indirect函数结合工作表名和要读取的单元格地址即可。