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


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

主题:统计表问题

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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
统计表问题  发帖心情 Post By:2014/8/21 17:52:00 [只看该作者]

Dim b As New SQLCrossTableBuilder("统计表3","采购明细")
b.HGroups.AddDef("供应商") '添加客户列用于水平分组
b.VGroups.AddDef("账期","{0}月") '添加日期列用于垂直分组
b.Totals.AddExp("付款","数量*单价-iif([付款] is null, 0, [付款])","未付款_值")'添加表达式列:未付款用于统计'添加金额列用于统计
b.VerticalTotal= True
b.HorizontalTotal = True
'b.Build '生成统计表
Tables("采购管理_Table6").DataSource = b.BuildDataSource()



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


说明:
如图所示
1、金额是表达式列,由单价*数量得出
2、付款是数值列,手动填入,意思是已实际发生的付款金额。
3、账期是日期列,比如2014年8月21日采购的物资,账期为2014年9月21日,意思是下月21日付款。
4、所用公式:应付=SUM(金额),已付=SUM(付款),未付=应付-已付,所用公式中金额、付款均作为列存在于表中,未付需用公式计算得出。
目的:生成每个供应商按月统计应付、已付、未付的数据,要求将应付、已付、未付作为标题列在月份的下面,像多表头一样。
看了帮助,还是没做成,特请帮助。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/21 17:57:00 [只看该作者]

 单独做一个项目,加入必要表格和窗口。上传上来,说明问题。

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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
  发帖心情 Post By:2014/8/21 18:20:00 [只看该作者]

列子上传
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:列子.rar


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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
  发帖心情 Post By:2014/8/21 18:21:00 [只看该作者]

Dim b As New SQLCrossTableBuilder("统计表3","采购明细")
b.HGroups.AddDef("供应商") '添加客户列用于水平分组
b.VGroups.AddDef("账期","{0}月") '添加日期列用于垂直分组
b.Totals.AddExp("付款","数量*单价-iif([付款] is null, 0, [付款])","未付款_值")'添加表达式列:未付款用于统计'添加金额列用于统计
b.VerticalTotal= True
b.HorizontalTotal = True
'b.Build '生成统计表
Tables("采购管理_Table6").DataSource = b.BuildDataSource()



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


说明:
如图所示
1、金额是表达式列,由单价*数量得出
2、付款是数值列,手动填入,意思是已实际发生的付款金额。
3、账期是日期列,比如2014年8月21日采购的物资,账期为2014年9月21日,意思是下月21日付款。
4、所用公式:应付=SUM(金额),已付=SUM(付款),未付=应付-已付,所用公式中金额、付款均作为列存在于表中,未付需用公式计算得出。
目的:生成每个供应商按月统计应付、已付、未付的数据,要求将应付、已付、未付作为标题列在月份的下面,像多表头一样。
看了帮助,还是没做成,特请帮助。
Dim b As New SQLCrossTableBuilder("统计表3","采购明细")
b.HGroups.AddDef("供应商") '添加客户列用于水平分组
b.VGroups.AddDef("账期","{0}月") '添加日期列用于垂直分组
b.Totals.AddExp("付款","数量*单价-iif([付款] is null, 0, [付款])","未付款_值")'添加表达式列:未付款用于统计'添加金额列用于统计
b.VerticalTotal= True
b.HorizontalTotal = True
'b.Build '生成统计表
Tables("采购管理_Table6").DataSource = b.BuildDataSource()



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


说明:
如图所示
1、金额是表达式列,由单价*数量得出
2、付款是数值列,手动填入,意思是已实际发生的付款金额。
3、账期是日期列,比如2014年8月21日采购的物资,账期为2014年9月21日,意思是下月21日付款。
4、所用公式:应付=SUM(金额),已付=SUM(付款),未付=应付-已付,所用公式中金额、付款均作为列存在于表中,未付需用公式计算得出。
目的:生成每个供应商按月统计应付、已付、未付的数据,要求将应付、已付、未付作为标题列在月份的下面,像多表头一样。
看了帮助,还是没做成,特请帮助。

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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
  发帖心情 Post By:2014/8/21 18:26:00 [只看该作者]

关键是将图中红色部分作出多表头的样子,每个月份下带“应付、已付、未付”,
图片点击可在新窗口打开查看此主题相关图片如下:无标题.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
  发帖心情 Post By:2014/8/21 18:28:00 [只看该作者]

列子在三楼


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/21 19:19:00 [只看该作者]

 这个意思?

 

Dim b As New SQLCrossTableBuilder("统计表3","表A")
b.HGroups.AddDef("供应商") '添加客户列用于水平分组
b.VGroups.AddDef("账期","{0}月") '添加日期列用于垂直分组
b.Totals.AddExp("应付","数量 * 单价")
b.Totals.AddExp("已付","付款")
b.Totals.AddExp("未付","数量 * 单价 - iif(付款 is null, 0, 付款)")
b.VerticalTotal= True
b.HorizontalTotal = True
'b.Build '生成统计表
b.Filter = "供应商 is not null and 账期 is not null"
Tables("应付未付_Table1").DataSource = b.BuildDataSource()

[此贴子已经被作者于2014-8-21 19:20:05编辑过]

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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
  发帖心情 Post By:2014/8/22 9:39:00 [只看该作者]

感谢,有限甜!正是我想要的结果啊

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


加好友 发短信
等级:三尾狐 帖子:668 积分:5053 威望:0 精华:0 注册:2011/10/22 13:37:00
  发帖心情 Post By:2014/8/22 9:39:00 [只看该作者]

对不起,有点甜

 回到顶部