Foxtable(狐表)用户栏目专家坐堂 → 老师,我明细有1月到3月的数据明细,目前3月份,我想根据成品编码,发货明细只汇总3月份的数据,请帮忙看看,谢谢


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

主题:老师,我明细有1月到3月的数据明细,目前3月份,我想根据成品编码,发货明细只汇总3月份的数据,请帮忙看看,谢谢

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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
老师,我明细有1月到3月的数据明细,目前3月份,我想根据成品编码,发货明细只汇总3月份的数据,请帮忙看看,谢谢  发帖心情 Post By:2018/3/11 17:24:00 [只看该作者]

用户已被锁定

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


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

1、分组统计参考

 

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

 

2、日期条件的合成,参考

 

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

 


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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
  发帖心情 Post By:2018/3/11 21:24:00 [只看该作者]

用户已被锁定

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


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

比如代码

 

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) '获取本月的最后一天
Dim Filter As String
Filter = "操作日期 >= #" & dt1 & "# And 操作日期 <= #" & dt2 & "# and 操作类型 = '产成入库'"
Tables("入库明细").Filter = Filter

 

分别统计,如 http://www.foxtable.com/webhelp/scr/0681.htm

 


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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
  发帖心情 Post By:2018/3/11 22:06:00 [只看该作者]

用户已被锁定

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


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


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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
  发帖心情 Post By:2018/3/12 21:22:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/12 21:46:00 [只看该作者]

这个意思?

dr("销售发货") = dt.Compute("Count(成品编码)", "本月发货 >= '" & dt1  & "' and 本月发货 <= '" & dt2 & "'")


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


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
  发帖心情 Post By:2018/3/12 21:55:00 [只看该作者]

用户已被锁定

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


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/3/12 22:14:00 [只看该作者]

If e.DataCol.Name = "成品编码"  Then
    dr("本月发货") = dt.Compute("sum(出货数量)", "出库日期 >= '" & dt1  & "' and 出库日期 <= '" & dt2 & "' and 成品编码 = '" & e.newvalue & "'")
End If

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