主题：如何将表C中的某一列数据按月汇总到表A中的某一列中

各位专家：您们好！

       我今天在编辑过程中，想将表C中按天记录的某一列的数据自动按月汇总后，将其月汇总的该数据自动填入表A中的对应月份的单元格中。请问有办法实现吗？请指明方法！谢谢！

您好！我参照了您给的例子，但是我的统计没有像例子中的产品对应关系，我只有统计年和统计月，而明细表C中是年月日的日期，所以我还是没有搞定。

如我想要将表C中如附件1所有材料的重量汇总后填入到表A中如附件2中2017年5月的本月已配出材料总量的单元格中。请帮忙解决！谢谢！

表A的DataColChanged事件

If e.DataCol.Name = "结算年" OrElse e.DataCol.Name = "结算月" Then
    If e.DataRow.Isnull("结算年") OrElse e.DataRow.Isnull("结算月") Then
        e.DataRow("总重量") = Nothing
    Else
        Dim d As Date = new Date(e.DataRow("结算年"), e.DataRow("结算月"), 1)
        e.DataRow("总重量") = DataTables("表C").Compute("sum(材料重量)", "配料日期 >= #" & d & "# and 配料日期 < #" & d.AddMonths(1) & "#")
    End If
End If