主题：设计统计公式

直接通过代码统计的话，这样：

 

Dim g As New GroupTableBuilder("统计表1", DataTables("材料交货"))
g.Groups.AddDef("客户名称")
g.Totals.AddDef("数量1", "品名1")
g.Totals.AddDef("数量2", "品名2")
g.Totals.AddDef("数量3", "品名3")
g.Totals.AddDef("数量4", "品名4")
g.Totals.AddDef("数量5", "品名5")
g.Totals.AddDef("数量6", "品名6")
g.Totals.AddDef("数量7", "品名7")
g.Totals.AddDef("数量8", "品名8")
g.Build()
MainTable = Tables("统计表1")

 

其实可以用菜单中的分组统计命令直接统计。

另：数量6应该改为数值型