主题：求助统计公式

何必呢？自己做个按钮，用交叉统计，代码为：

 

Dim g As New CrossTableBuilder("统计表1", DataTables("表A"))
g.HGroups.AddDef("产品")
g.VGroups.AddDef("日期", "日期_{0}月")
g.Totals.AddDef("金额", "单价")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Build()
MainTable = Tables("统计表1")

 

需要新的统计结果的时候，单击这个按钮即可生成一个新的表。

甚至不用写按钮，直接在交叉统计将设置保存下来，随时可以通过菜单调用.

 

如果要保持原表，你得付出代价，参考：

http://help.foxtable.com/topics/0681.htm