Foxtable(狐表)用户栏目专家坐堂 → 如下列表格,怎样计算空行之间B列单元格数值的和填入C列?


  共有2540人关注过本帖树形打印复制链接

主题:如下列表格,怎样计算空行之间B列单元格数值的和填入C列?

帅哥哟,离线,有人找我吗?
comnets
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:698 积分:5618 威望:0 精华:0 注册:2013/4/9 6:59:00
如下列表格,怎样计算空行之间B列单元格数值的和填入C列?  发帖心情 Post By:2018/12/11 18:26:00 [只看该作者]

例如:
行数 A B C
1 a 1  
2 b 2  
3 c 1  
     (C4这里想得到B1:B3的和)
5 d 5  
6 e 3  
7 f 6  
8 g 6  
     (C9这里想得到B1:B3的和)
10 h 6  
11 i 7  
12     (C12这里想得到B1:B3的和)
13 j 2  
14 k 9  
15 l 5  
16     (C16这里想得到B1:B3的和)


AB列有内容的单元格之间的空行间隔个数是不确定的,想要在空行计算B列空行之间的和填入C列,应该怎么做?
[此贴子已经被作者于2018/12/11 18:33:48编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110865 积分:564275 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/11 19:55:00 [只看该作者]

Dim sum As Integer = 0
For Each r As Row In Tables("表A").Rows
    If r.IsNull("B") Then
        r("C") = sum
        sum = 0
    Else
        sum = sum + r("B")
    End If
Next


 回到顶部