Foxtable(狐表)用户栏目专家坐堂 → 统计问题


  共有2792人关注过本帖树形打印复制链接

主题:统计问题

帅哥哟,离线,有人找我吗?
王大刚
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
统计问题  发帖心情 Post By:2018/9/22 16:29:00 [显示全部帖子]

统计表可以在窗口中显示,条件是有起止日期,如:2018-09-01,到2018-09-30,下次再统计别的时间段,又要修改,如附件形式的,我用了一段代码,无法实现,请大师指正修改。

Dim g As New CrossTableBuilder("月销售统计", DataTables("进销存表"))

g.Caption = "月销售统计(汇总)"

g.HGroups.AddDef("渠道")

g.VGroups.AddDef("类型")

g.Totals.AddDef("类型", AggregateEnum.Count, "数量")

g.HorizontalTotal = True

g.VerticalTotal = True

g.Filter = "[开piao时间]>=# Datp1.Value # AND [开piao时间]<=# Datp2.Value # AND [业务员]  <> '焦总'"

Tables("报表窗口_Table1").DataSource = g.BuildDataSource()

[此贴子已经被作者于2018/9/22 16:34:01编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
  发帖心情 Post By:2018/9/22 16:36:00 [显示全部帖子]

Dim g As New CrossTableBuilder("月销售统计"DataTables("进销存表"))

g.Caption = "月销售统计(汇总)"

g.HGroups.AddDef("渠道")

g.VGroups.AddDef("类型")

g.Totals.AddDef("类型"AggregateEnum.Count"数量")

g.HorizontalTotal = True

g.VerticalTotal = True

g.Filter = "[开piao时间]>=# Datp1.Value # AND [开piao时间]<=# Datp2.Value # AND [业务员]  <> '焦总'"

Tables("报表窗口_Table1").DataSource = g.BuildDataSource()

功能和疑问详看附件中。谢谢!!!!
[此贴子已经被作者于2018/9/22 16:40:25编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
  发帖心情 Post By:2018/9/22 16:45:00 [显示全部帖子]

这种窗口统计很常用,请帮忙指正一下为谢!!!
[此贴子已经被作者于2018/9/22 16:49:22编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
  发帖心情 Post By:2018/9/22 16:54:00 [显示全部帖子]

这个代码测试了,不行,提示,未声明名称。


 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
有点蓝:请看这个  发帖心情 Post By:2018/9/22 16:57:00 [显示全部帖子]

统计表可以在窗口中显示,条件是有起止日期,如:2018-09-01,到2018-09-30,下次再统计别的时间段,又要修改,如附件形式的,我用了一段代码,无法实现,请大师指正修改。

Dim g As New CrossTableBuilder("月销售统计"DataTables("进销存表"))

g.Caption = "月销售统计(汇总)"

g.HGroups.AddDef("渠道")

g.VGroups.AddDef("类型")

g.Totals.AddDef("类型"AggregateEnum.Count"数量")

g.HorizontalTotal = True

g.VerticalTotal = True

g.Filter = "[开piao时间]>=# Datp1.Value # AND [开piao时间]<=# Datp2.Value # AND [业务员]  <> '焦总'"

Tables("报表窗口_Table1").DataSource = g.BuildDataSource()

功能和问题详见附件。谢谢!!

 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
  发帖心情 Post By:2018/9/22 17:02:00 [显示全部帖子]

附件支持哪几种格式?我的文件是DOC文档,上传时怎么提示错误格式呢?


 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
统计问题  发帖心情 Post By:2018/9/22 17:20:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:报表窗口.xls

请看这个附件,就明白意思了,请帮忙指正一下。

 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
有点蓝:请看这个  发帖心情 Post By:2018/9/22 17:23:00 [显示全部帖子]

这个WORD文档更明白一些。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:利用窗口显示报表.rar


 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
有点蓝:请看这个  发帖心情 Post By:2018/9/22 17:30:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:利用窗口显示报表.rar

请看这个附件,就明白意思了,请指教,谢谢!!!!

 回到顶部
帅哥哟,离线,有人找我吗?
王大刚
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:42 积分:423 威望:0 精华:0 注册:2018/9/7 21:52:00
  发帖心情 Post By:2018/9/22 17:33:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:利用窗口显示报表.rar
,请看这个附件就明白了。谢谢!!!

 回到顶部
总数 13 1 2 下一页