以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  表达式求和  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69528)

--  作者:qingwuzu
--  发布时间:2015/6/6 16:55:00
--  表达式求和
销售明细表有 货品名称 数量 单据编号 单据日期 业务类型 等列的数据  如果要在商品跟踪表里输入 货品代码 后  统计指定 日期的 业务分类的合计数量(分了新店销量,直营销售和不和销量)在同一行显示   EXCLE 可以增加辅助列 用SUMIF来统计 狐表怎么弄
图片点击可在新窗口打开查看此主题相关图片如下:求助.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看此主题相关图片如下:11.png
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:商品跟踪1.xlsx


[此贴子已经被作者于2015/6/6 17:05:19编辑过]

--  作者:狐狸爸爸
--  发布时间:2015/6/6 21:10:00
--  
你上传的是个excel文件,而且和你的图片和问题不匹配,建议用foxtable文件作为例子。



--  作者:qingwuzu
--  发布时间:2015/6/9 11:41:00
--  
Select Case e.DataCol.Name
    Case "货品代码"
        e.DataRow("直营销量") = DataTables("直营销售").Compute("Sum(Quantity)","[GoodsId] = \'" & e.DataRow("货品ID") & "\'  and [单据类型] = \'直营\'")
        e.DataRow("补货销量") = DataTables("直营销售").Compute("Sum(Quantity)","[GoodsId] = \'" & e.DataRow("货品ID") & "\'  and [单据类型] = \'补货\'")
        e.DataRow("新店销量") = DataTables("直营销售").Compute("Sum(Quantity)","[GoodsId] = \'" & e.DataRow("货品ID") & "\'  and [单据类型] = \'新店出货\'")
        If e.NewValue Is Nothing Then
            e.DataRow("阶段总销量") = Nothing
        Else
            e.DataRow("阶段总销量") = e.DataRow("新店销量") + e.DataRow("补货销量") + e.DataRow("直营销量")
        End If
End Select
怎么让直营销售为零的时候显示 0呢

--  作者:大红袍
--  发布时间:2015/6/9 11:50:00
--  

 e.DataRow("阶段总销量") = e.DataRow("新店销量") + e.DataRow("补货销量") + e.DataRow("直营销量")

 

改成

 

 Dim sum = e.DataRow("新店销量") + e.DataRow("补货销量") + e.DataRow("直营销量")

 e.DataRow("阶段总销量") = IIF(sum = 0, Nothing, sum)