主题：当前表及时SUM统计的问题

谢谢老师前面指导的代码，现再请教老师，下面代码如何实现，在当前表及时SUM统计小计列的值，填入到当前表总量列中，用于计算其他列的值（这里用不了临时表统计，因为要填入其他相关的值进行计算）

 

如果用双击单元格的方法在DoubleClick里面到是可以实现，但是需要每行点击指定的单元格，总量列才会统计

 

例如：  总量   小计    份额  ...   ....

 

              10     3       30%

 

              10     2       20%

 

              10     5       50%

 

If e.DataCol.Name = "项目编号" OrElse e.DataCol.name = "岗位层级" Then '发生变化的是"任务编号"和"岗位层级"列.

   If e.DataRow("岗位层级") = "中层正职" OrElse e.DataRow("岗位层级") = "中层副职" Then

    e.DataRow("总量") = DataTables("表A").Compute("Sum(小计)","[项目编号] = '" & e.DataRow("项目编号") & "'and 岗位层级 Like '%中层%'")

    end if

end if

 

      现在计算出来是

             总量   小计    份额  ...   ....

 

              3     3       100%

 

              5     2       40%

 

              10    5       50%

If e.DataCol.Name = "项目编号" OrElse e.DataCol.name = "岗位层级" Then '发生变化的是"任务编号"和"岗位层级"列.

   If e.DataRow("岗位层级") = "中层正职" OrElse e.DataRow("岗位层级") = "中层副职" Then

       e.DataTable.ReplaceFor("总量", e.DataTable.Compute("Sum(小计)","[项目编号] = '" & e.DataRow("项目编号") & "' and 岗位层级 Like '%中层%'"), "[项目编号] = '" & e.DataRow("项目编号") & "' and 岗位层级 Like '%中层%'")

   End If

End If