以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  复杂汇总问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23145)

--  作者:实话实说
--  发布时间:2012/9/3 16:51:00
--  复杂汇总问题
想通过表A的数据得到表D的汇总模式(类似帐页)
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:汇总.table


--  作者:czy
--  发布时间:2012/9/3 22:10:00
--  
别费那个神了,自己加个表达式列就解决了。
--  作者:czy
--  发布时间:2012/9/3 22:16:00
--  

很简单的事

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目28.table


--  作者:狐狸爸爸
--  发布时间:2012/9/3 23:06:00
--  

NND,还是C版灵活,我正想回复三字“没办法”呢。

 

图片点击可在新窗口打开查看

 


--  作者:实话实说
--  发布时间:2012/9/4 6:34:00
--  
呵,不知怎么感谢C版,这个功能要求是为了代替仓库手工帐
--  作者:wjl-se
--  发布时间:2012/9/4 15:18:00
--  
妙,实在是妙,收藏下图片点击可在新窗口打开查看
--  作者:实话实说
--  发布时间:2012/9/4 19:32:00
--  

还有点问题:1 产品的月累计要求截止到本月; 2 我已经设置了自动库存代码,需要将上一栏的库存填入到月累计栏 重新上传附件

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

帮助中并没有介绍产品的月截止统计

[此贴子已经被作者于2012-9-4 19:32:51编辑过]

--  作者:czy
--  发布时间:2012/9/4 19:56:00
--  

……

 

Dim r As Row
For i As Integer = 0 To Tables("表A").Rows.Count(True) - 1
    r = Tables("表A").Rows(i,True)
    If r.IsGroup
        r("型号") = r("汇总")
        r("库存") = r("入仓") - r("出仓")
    End If
Next


--  作者:实话实说
--  发布时间:2012/9/4 20:37:00
--  
呵,C版晚上好,7楼的第1个问题,产品的月统计需要截止到本月,3楼的示例只是统计当月
--  作者:czy
--  发布时间:2012/9/4 23:29:00
--  

感觉你这样做是在自找麻烦,不用日期分组怎么截止啊?