Foxtable(狐表)用户栏目专家坐堂 → foxtable交叉统计加一列最近库存变化时刻的问题。


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

主题:foxtable交叉统计加一列最近库存变化时刻的问题。

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/8 8:37:00 [显示全部帖子]

麻烦以后发代码不要发带行号的,像下面这样直接发即可。

无法直接统计,要另外使用代码处理:
Dim g As New CrossTableBuilder("统计表1", DataTables("库存变化表"))
g.HGroups.AddDef("物资编码")
g.VGroups.AddDef("仓库名称")
g.Totals.AddDef("入库数量", "入库数量")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Filter = "[仓库名称] <> '购入'"
g.Build()
MainTable = Tables("统计表1")
DataTables("统计表1").DataCols.Add("最近库存变化时刻", Gettype(Date))
For Each r As Row In Tables("统计表1").Rows
    If r("物资编码") <> "合计" Then
        r("最近库存变化时刻") = DataTables("库存变化表").Compute("max(库存变化时刻)","物资编码='" & r("物资编码") & "'")
    End If
Next

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


加好友 发短信
等级:超级版主 帖子:107680 积分:547721 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/8 16:10:00 [显示全部帖子]


 回到顶部