Foxtable(狐表) → 用户栏目 → 专家坐堂 → 汇总模式时候可以不计算某些行？


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

主题：汇总模式时候可以不计算某些行？
帅哥哟，离线，有人找我吗？
lur320
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1035 积分：9009 威望：0 精华：0 注册：2015/8/12 16:28:00 		汇总模式时候可以不计算某些行？  发帖心情 Post By：2024/1/19 9:01:00 [只看该作者]

 如图，
图片点击可在新窗口打开查看此主题相关图片如下：捕获.png
图片点击可在新窗口打开查看

待检结余和发货结余是两列，又想左右拆开显示。怎么样能让这些列是0的不参与汇总？或者汇总结果显示空值？
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111820 积分：569254 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/1/19 9:35:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
lihe60
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：6905 积分：43727 威望：0 精华：0 注册：2009/3/2 14:07:00 		  发帖心情 Post By：2025/1/15 8:33:00 [只看该作者]

For Each c As Col In tjt.cols
    If c.Name.contains("金额") Or c.Name.contains("数量") Or c.Name.contains("利润") Then
        tjt.Cols(c.name).GrandTotal = True
        tjt.GrandTotal = True '显示合计模式
        Dim r2 As Row = tjt.Rows(tjt.Rows.count - 1, True)
    End If
Next
这个代码能不能增加一个汇总条件？
 回到顶部
帅哥哟，离线，有人找我吗？
lihe60
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：6905 积分：43727 威望：0 精华：0 注册：2009/3/2 14:07:00 		  发帖心情 Post By：2025/1/15 8:35:00 [只看该作者]

如
For Each c As Col In tjt.cols
    If c.Name.contains("金额") Or c.Name.contains("数量") Or c.Name.contains("利润") Then
        tjt.Cols(c.name).GrandTotal = True

tjt.fiter="1=1"

        tjt.GrandTotal = True '显示合计模式
        Dim r2 As Row = tjt.Rows(tjt.Rows.count - 1, True)
    End If
Next
 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111820 积分：569254 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2025/1/15 8:41:00 [只看该作者]

合计模式加不了。汇总模式参考2楼

 回到顶部
帅哥哟，离线，有人找我吗？
lihe60
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：6905 积分：43727 威望：0 精华：0 注册：2009/3/2 14:07:00 		  发帖心情 Post By：2025/1/15 9:28:00 [只看该作者]

合计模式下的行如何判断？

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


加好友 发短信
等级：超级版主 帖子：111820 积分：569254 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2025/1/15 10:00:00 [只看该作者]

Dim r As Row = Tables("表A").Current
If r Is Nothing Then
    MsgBox("表格没有数据，或者选中的合计行")
End If 
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询