Foxtable(狐表)用户栏目专家坐堂 → [求助]Excel报表中,如果有两个分组:小计、合计,合计=小计的总和,要怎样实现?


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

主题:[求助]Excel报表中,如果有两个分组:小计、合计,合计=小计的总和,要怎样实现?

美女呀,离线,留言给我吧!
tusanmuli123
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:22 积分:197 威望:0 精华:0 注册:2022/8/27 16:37:00
[求助]Excel报表中,如果有两个分组:小计、合计,合计=小计的总和,要怎样实现?  发帖心情 Post By:2022/9/19 11:11:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:报表事件.png
图片点击可在新窗口打开查看

求助:合计显示的是最后一个小计的数据。要怎么实现小计的汇总呢?
[此贴子已经被作者于2022/9/19 11:15:02编辑过]

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


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

请提供实例测试

 回到顶部
美女呀,离线,留言给我吧!
tusanmuli123
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:22 积分:197 威望:0 精华:0 注册:2022/8/27 16:37:00
  发帖心情 Post By:2022/9/19 11:16:00 [只看该作者]

要怎么提供给您?

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


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

新增项目,导入这个表和部分测试数据,然后把这个项目文件和模板文件一起发上来

 回到顶部
美女呀,离线,留言给我吧!
tusanmuli123
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:22 积分:197 威望:0 精华:0 注册:2022/8/27 16:37:00
  发帖心情 Post By:2022/9/19 11:40:00 [只看该作者]

项目文件

 回到顶部
美女呀,离线,留言给我吧!
tusanmuli123
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:22 积分:197 威望:0 精华:0 注册:2022/8/27 16:37:00
  发帖心情 Post By:2022/9/19 11:41:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:采购通知单.xls


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


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

项目文件呢?

 回到顶部
美女呀,离线,留言给我吧!
tusanmuli123
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:22 积分:197 威望:0 精华:0 注册:2022/8/27 16:37:00
  发帖心情 Post By:2022/9/19 12:24:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:采购通知单-项目文件.rar


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


加好友 发短信
等级:超级版主 帖子:111389 积分:567009 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/9/19 13:39:00 [只看该作者]

BuildGroupFooter事件

Select Case e.Book.TempLate
    Case "采购通知单"
        Dim Sum1, Sum2 As Double
        For Each dr As DataRow In e.GroupRows
            If dr("库存数材料KG") > 0 Then
                Sum1 = dr("库存数材料KG")
            End If
            Sum2 = Sum2 + dr("库存数材料KG")
        Next
        e.Book.Marks("小计") = Sum1
        e.Book.Marks("合计") = Sum2
End Select

 回到顶部
美女呀,离线,留言给我吧!
tusanmuli123
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:22 积分:197 威望:0 精华:0 注册:2022/8/27 16:37:00
  发帖心情 Post By:2022/9/19 13:52:00 [只看该作者]

按您的方式更改了,但数据还是有问题。
图片点击可在新窗口打开查看此主题相关图片如下:结果显示.jpg
图片点击可在新窗口打开查看

 回到顶部
总数 14 1 2 下一页