主题：同表跨行同批次加和

狐爸及各位大侠好：

     我现在想将同表中相同批次的某列的数量进行加和,并且每增加一行相同批次的数量，总和都会实时更新。我大概写了下面的代码，但不行，麻烦各位帮忙解决：

If e.DataCol.Name = "实入仓M_正品M" Then 

    e.DataRow("相同批次总M") = DataTables("DNP入仓规划").Compute("Sum(实入仓M_正品M)","[DNP生产批次] = '" & e.NewValue & "'")
End If