标题：汇总模式时候可以不计算某些行？

1楼

lur320 发表于：2024/1/19 9:01:00

如图，

此主题相关图片如下：捕获.png

待检结余和发货结余是两列，又想左右拆开显示。怎么样能让这些列是0的不参与汇总？或者汇总结果显示空值？

2楼

有点蓝 发表于：2024/1/19 9:35:00

3楼

lihe60 发表于：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

这个代码能不能增加一个汇总条件？

4楼

lihe60 发表于：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

5楼

有点蓝 发表于：2025/1/15 8:41:00

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

6楼

lihe60 发表于：2025/1/15 9:28:00

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

7楼

有点蓝 发表于：2025/1/15 10:00:00

Dim r As Row = Tables("表A").Current

If r Is Nothing Then

MsgBox("表格没有数据，或者选中的合计行")

End If

共7 条记录, 每页显示 10 条, 页签: [1]