大神帮我啊，这个模板用什么表达式生成啊！我已经把数据源和模板上传了。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

下载信息 [文件大小：下载次数： ]
点击浏览该文件:数据源.xlsx

下载信息 [文件大小：下载次数： ]
点击浏览该文件:模板.xlsx

大神帮我啊，这个模板用什么表达式生成啊！我已经把数据源和模板上传了。

利用狐表自身的统计功能,统计好了再导出!

给个提示啊，应该用哪种统计方式，是汇总还是分组啊，能不能给个截图啊，跪谢啊！

其实不复杂：

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目9.table

有笔误，改一下：

DataTables("统计").DataRows.clear()
Dim values() As Double = {2000,1500,1000,500,300}
For i As Integer = 0 To values.length - 1
    Dim flt As String = "月均销量 >= " & values(i)
    If i > 0 Then
        flt = flt & " And 月均销量 < " & values(i-1)
    End If
    Dim dr As DataRow = DataTables("统计").AddNew
    dr("产品结构") = "月均" & values(i) & "销量"
    dr("款数") = DataTables("产品").Compute("Count([_Identify])",flt)
    dr("销量合计") = DataTables("产品").Compute("Sum(月均销量)",flt)
    dr("产品名称") = DataTables("产品").GetComboListString("产品名称",flt).replace("|",",")
    dr("合计占比") = dr("销量合计") / DataTables("产品").Compute("Sum(月均销量)")
Next

大神，我要把月均销量在100以下的产品全部汇总，代码怎么写？

你想在哪里汇总,一句代码就可以的了.

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

在狐爸代码的基础上，加一点就行了。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:销量统计.table

DataTables("统计").DataRows.clear()
Dim values() As Double = {2000,1500,1000,500,300,100}
For i As Integer = 0 To values.length - 1
    Dim flt As String = "月均销量 >= " & values(i)
    If i > 0 Then
        flt = flt & " And 月均销量 < " & values(i-1)
    End If
    Dim dr As DataRow = DataTables("统计").AddNew
    dr("产品结构") = "月均" & values(i) & "销量"
    dr("款数") = DataTables("产品").Compute("Count([_Identify])",flt)
    dr("销量合计") = DataTables("产品").Compute("Sum(月均销量)",flt)
    dr("产品名称") = DataTables("产品").GetComboListString("产品名称",flt).replace("|",",")
    dr("合计占比") = dr("销量合计") / DataTables("产品").Compute("Sum(月均销量)")
    If i = values.length - 1 Then
        flt = "月均销量 < " & values(i)
        dr = DataTables("统计").AddNew
        dr("产品结构") = "月均小于" & values(i) & "销量"
        dr("款数") = DataTables("产品").Compute("Count([_Identify])",flt)
        dr("销量合计") = DataTables("产品").Compute("Sum(月均销量)",flt)
        dr("产品名称") = DataTables("产品").GetComboListString("产品名称",flt).replace("|",",")
        dr("合计占比") = dr("销量合计") / DataTables("产品").Compute("Sum(月均销量)")
    End If
Next

主题：大神帮我啊，这个模板用什么表达式生成啊！我已经把数据源和模板上传了。