以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52471)

--  作者:gaixuebo
--  发布时间:2014/6/16 19:16:00
--  [求助]
A 2014-6-7 0:00:00 进货 2000 4.324 4.678
B 2014-6-8 0:00:00 进货 6000 4.678 6.778
C 2014-7-8 0:00:00 进货 6000 4.765 3.432
A 2014-9-5 0:00:00 进货 5999 4.765 3.543
B 2014-5-6 0:00:00 进货 4333 5.654 7.543
请教大神:针对第一列每一个值(实际有很多值,可能要N多个字母组合),筛选出最早和最晚进货的单价,然后计算出最早和最晚两个单价的差值的绝对值。谢谢各位

--  作者:有点甜
--  发布时间:2014/6/16 19:18:00
--  
 做一个项目,做一张表,上传上来。说明要在哪个地方实现什么功能。
--  作者:有点甜
--  发布时间:2014/6/16 19:20:00
--  

 或者自己参考帮助文档来做。用find函数查出最早和最晚的日期,再相减,即可

 

http://www.foxtable.com/help/topics/0396.htm

 


--  作者:gaixuebo
--  发布时间:2014/6/16 19:23:00
--  
好的。
--  作者:gaixuebo
--  发布时间:2014/6/16 19:59:00
--  
项目传上去了!先谢谢你了!
我想实现的功能:首先,在表A中,针对第一列的每一个内容(实际有N多字母组合组成),分别筛选出日期最早和最晚的值(这个用FIND函数都能找到吗?),然后计算出第五列和第六列的差值的绝对值,除以表C中的各列所对应的值L1,L2。。。。。。最后显示出表A第一列中的每一个内容所对应的关联值与计算所得出来的值。谢谢图片点击可在新窗口打开查看
                       

--  作者:有点甜
--  发布时间:2014/6/16 20:00:00
--  
 呃,未见项目。
--  作者:gaixuebo
--  发布时间:2014/6/16 20:02:00
--  
这个
--  作者:gaixuebo
--  发布时间:2014/6/16 20:05:00
--  
我已经上传了呢?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:进货数量与价格.table


--  作者:有点甜
--  发布时间:2014/6/16 20:17:00
--  

不清楚你要做什么计算差值,这样做

 

For Each n As String In DataTables("表A").GetValues("第一列", "第一列 is not null")
    Dim dr1 As DataRow = DataTables("表A").Find("第一列 = \'" & n & "\'", "第二列")
    Dim dr2 As DataRow = DataTables("表A").Find("第一列 = \'" & n & "\'", "第二列 desc")
    msgbox(n & " : " & math.Abs(dr2("第五列") - dr1("第五列")))
Next


--  作者:y2287958
--  发布时间:2014/6/16 20:21:00
--  
连具体列名都没有
要得到结果是什么,也看不出来