如何在筛选项目下汇总求和，请各位大神教教菜鸟？代码是学习大神的

youknow

Sub shishi()
    Dim cx As New 类1, pt$, sql$
    Application.ScreenUpdating = False
    t = Array("PO1", "PO2", "PO3", "PO4")
    pt = ThisWorkbook.FullName
    For i = 0 To UBound(t)
        sql = "select  PO代码, PO订单, 区域 , 订单名称, 订单金额, 合同名称  from [订单明细$a1:g] where PO代码 = '" & t(i) & "'"
        Sheets(i + 2).Activate: Range("a1", Cells(1000, "e")).ClearContents
        [a1:e1] = Array("PO代码", "PO订单", "区域", "订单名称", "订单金额", "合同名称")
        cx.执行sql命令 pt, sql, "a2"
    Next
    Sheet2.Activate
    Application.ScreenUpdating = True
    MsgBox "提取完成，请核对！"
End Sub
需要对订单金额进行汇总，po1\po2\po3\po4这四个表中的订单金额列进行求和汇总；请大神赐教！帮帮忙

youknow

我是新手，刚注册的，不能上传附件和照片

abc123281

想要得到完美答案  必须上传附件

youknow

可以上传了，我想把PO1、PO2、PO3、PO4、中按工程名称相对应的订单，进行汇总求和到订单汇总金额中，请大神指教！谢谢

abc123281

不明白你需要按哪几列来分类汇总    或者是某一列  或是多列

youknow

我是根据PO1、PO2、PO3、PO4中的F列（合同名称）进行筛选后，对名称相同，求和E列数据（订单金额）；请大神能给与支持和帮助，谢谢！

youknow

汇总到表项目一览表中的订单汇总中