以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]查询表水平、垂直转置(已解决!)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116686)

--  作者:syjylyq
--  发布时间:2018/3/29 13:29:00
--  [求助]查询表水平、垂直转置(已解决!)

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


比如上面这张表,用交叉统计改成如下
Dim b As New CrossTableBuilder("统计表1",DataTables("流转车间"))
b.Filter = "[工单号] = \'17-0433M\'" \'仅统计客户为CS01的记录
\'b.HGroups.AddDef("工单号")
b.HGroups.AddDef("颜色")
b.HGroups.AddDef("尺码")
\'添加水平分组
b.VGroups.AddDef("工序序号")
b.VGroups.AddDef("流转车间")
b.VGroups.AddDef("工序名称")
\'添加垂直分组
b.Totals.AddDef("良品数量")
b.Totals.AddDef("次品数量")
b.Totals.AddDef("报废数量")
b.Totals.AddDef("多余数量")
\'添加数量列用于统计
b.Build \'生成统计表
MainTable = Tables("统计表1") \'打开生成的统计表


图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

后来发现列数太多,想把几个数量改成水平分布,请问有什么方法直接生成最终想要的表?
还是先用交叉统计,在转置?

目标样式:

图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2018/3/30 15:54:06编辑过]

--  作者:有点甜
--  发布时间:2018/3/29 15:06:00
--  

如果用交叉统计,多加一些分组列,如

 

b.HGroups.AddDef("颜色")
b.HGroups.AddDef("尺码")
b.HGroups.AddDef("数量")

 

如果要灵活的交叉统计,参考

 

http://www.foxtable.com/webhelp/scr/2394.htm

 

或者,可以这样固定统计

 

http://www.foxtable.com/webhelp/scr/0681.htm

 


--  作者:syjylyq
--  发布时间:2018/3/30 15:49:00
--  
请问我在窗口建立查询按钮,怎么把生成的临时表加载到表空间中?

Tables("车间进度跟进_Table1").DataSource = dtb.BuildDataSource

这行代码只显示表头,没有显示行数据。

--  作者:syjylyq
--  发布时间:2018/3/30 15:54:00
--  
OK了,解决了。
--  作者:有点甜
--  发布时间:2018/3/30 15:55:00
--  

1、你生成的临时表的代码怎么写的?

 

2、试试改成 Tables("车间进度跟进_Table1").DataSource = DataTables("临时表名")