- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]汇总模式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139558)
-- 发布时间：2019/8/15 16:17:00
-- [求助]汇总模式
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:book1.xlsx |
可以实现表中这样的汇总模式吗
-- 发布时间：2019/8/15 16:51:00
--
参考：http://www.foxtable.com/webhelp/topics/1507.htm
比如：[$表名,sum(金额),分组2=\'东\']
-- 发布时间：2019/8/15 18:30:00
--
不是在EXCEL报表中，是在统计查询中实现
-- 发布时间：2019/8/15 19:59:00
--
看起来不可能，其实不难：
关键知识：
http://www.foxtable.com/webhelp/topics/1594.htm
此主题相关图片如下：test.jpg
[此贴子已经被作者于2019/8/15 20:01:11编辑过]
-- 发布时间：2019/8/15 20:36:00
--
-- 发布时间：2019/8/18 9:53:00
--
另外在汇总模式下，AggregateEnum型枚举，如平均值，小计行或总计行的平均值都是对已生成的统计表的分组数据的平均，能否根据原始数据表中的数据平均呢，如例
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目6.foxdb |
-- 发布时间：2019/8/18 13:49:00
--
道理一样，另外你对汇总模式的当前表理解有误。
加上以下代码，可以得到结果。
Dim r As Row
For i As Integer = 0 To Tables("统计表1").Rows.Count(True) - 1 \'Count加上参数True
r = Tables("统计表1").Rows(i,True) \'Rows也需要加上参数True
If r.IsGroup Then \'如果是分组行
Dim bds As String = ""
If r("部门") <> "总计"
bds = "部门=\'" & r("部门").split(" ")(0) & "\'"
End If
r("工资") = DataTables("表A").Compute("Avg(工资)",bds)
End If
Next
-- 发布时间：2019/9/16 14:56:00
--
狐爸，这里你上传的这个附件能帮我版本弄低点上传吗，我现在系统的版本停留在2018.9月，打不开这个附件
-- 发布时间：2019/9/16 15:08:00
--
这个没有办法，除非升级。或者看看：http://www.foxtable.com/webhelp/topics/1911.htm