以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]关于交叉统计之份额 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139922) |
-- 作者:lgj716330 -- 发布时间:2019/8/25 13:21:00 -- [求助]关于交叉统计之份额 交叉统计生成水平份额后,如何生成小计或总计行的份额呢 |
-- 作者:y2287958 -- 发布时间:2019/8/25 13:31:00 -- 统计后自行修改 |
-- 作者:有点蓝 -- 发布时间:2019/8/25 21:20:00 -- 参考:http://www.foxtable.com/webhelp/topics/1964.htm |
-- 作者:lgj716330 -- 发布时间:2019/8/26 14:28:00 -- 好吧,主要是列数不固定的,搞起来有点麻烦 |
-- 作者:lgj716330 -- 发布时间:2019/8/26 14:32:00 -- Dim f As String = "产品 = \'" & r("产品") & "\'" Dim v As String = " 订单数:" & t.Compute("Count(日期)",f) v = v & " 订购数量:" & t.Compute("Sum(数量)",f) v = v & " 订购金额:" & t.Compute("Sum(金额)",f) r("产品") = "产品:" & r("产品") & v 这里统计出来的结果可以弄成两行吗,一行有时候太长看不全
|
-- 作者:有点蓝 -- 发布时间:2019/8/26 15:02:00 -- 加上回车,然后把行拉高 v = v & vbcrlf & " 订购数量:" & t.Compute("Sum(数量)",f)
|