以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何生成这样的EXCEL报表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101827)

--  作者:seal51
--  发布时间:2017/6/7 23:20:00
--  [求助]如何生成这样的EXCEL报表

[求助]如何生成这样的EXCEL报表

 


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

--  作者:wyz20130512
--  发布时间:2017/6/7 23:24:00
--  
分组汇总即可!


--  作者:有点蓝
--  发布时间:2017/6/8 9:02:00
--  
先做个分组汇总,然后通过分组汇总出来的表输出报表
--  作者:seal51
--  发布时间:2017/6/8 14:48:00
--  
谢谢大家的回复!不过统计表如何导出到有格式的EXCEL表中呢?
--  作者:有点蓝
--  发布时间:2017/6/8 15:28:00
--  
设置模板,模板的表名称使用统计表的名称即可
--  作者:seal51
--  发布时间:2017/6/9 15:40:00
--  

Dim g As New GroupTableBuilder("统计表1", DataTables("采购明细表"))
g.Groups.AddDef("产品图号")
g.Groups.AddDef("产品名称")
g.Groups.AddDef("产品材料")
g.Groups.AddDef("产品规格")
g.Groups.AddDef("单位")
g.Totals.AddDef("采购数量")
g.Totals.AddDef("采购含税金额")
g.VerticalTotal = True
g.Filter = "采购单号 = \'" & Tables("采购主表").Current("采购单号") & "\'"
g.Build()

Tables ("采购统计_Table1" ). DataSource  = DataTables ("统计表1" )

 

如果DataTables("采购明细表"))里的采购明细表更改为《采购主表.采购明细表》代码如何更改


--  作者:有点色
--  发布时间:2017/6/9 15:59:00
--  

就是6楼的代码,你设置g.filter的时候,就是关联表的内容了。

 

而且,不能直接使用关联表做统计的。


--  作者:seal51
--  发布时间:2017/6/9 16:03:00
--  
但是我是在关联表里操作的, 加个按钮统计不是当前采购单号的数据, 必须在采购明细表里打开才正常, 如何定位筛选呢
--  作者:seal51
--  发布时间:2017/6/9 16:08:00
--  
好像这样更改就可以了g.Filter = "采购单号 = \'" & Tables("采购主表.采购明细表").Current("采购单号") & "\'"

--  作者:有点色
--  发布时间:2017/6/9 16:11:00
--  

 在这个基础上,如果要再筛选,就加上你另外的条件

 

g.Filter = "采购单号 = \'" & Tables("采购主表").Current("采购单号") & "\'"