小板哥，人家不是懒得一个一个写公式吗 而且估计代码也不是他写的 自己都不懂 那么 sumif 那么麻烦的 他才不用呢

谢谢你，每一行求和，只想有车次的N列有求和公式，表头不用。代码运行后N列在表头所在的行业求和了。 5# zhaozyuan

看不到你的代码，N列有表头的地方不要求求和。 4# Anonymous

加不加 （送货费 短运费 中转费 ）？

10# zhaozyuan
真服了你了，说直接一点嘛
你就直接说求和那行是
[tr][/tr]

提付 代收款

提付运费

现金

回单 付款

送货 费

短运 费

中转 费

这7项相加吗？还是只加前四项（如果前四项，你公式没错）

不加 我遇到的主要问题是   比如     第147车次的备注下面一行就是第148车的表头，但是第47车的备注下两行才是48车次的表头这个很不好处理。先谢谢你了。
10# zhaozyuan

我附件改了下把合计加上了。 12# nirdong

明明没有错呀

单元格 行数  列数     J列公式                         k列公式                     L列公式                     N列公式   
__________________________________________________
车次      2     20
合计      65    2  =SUM(F$4:F$64)        =SUM(H$4:H$64)           =SUM(J$4:J$64)   =SUM(J65:M65)     
__________________________________________________
车次      68    20
合计      87    2  =SUM(F$70:F$86)        =SUM(H$70:H$86)      =SUM(J$70:J$86)     =SUM(J87:M87)        
__________________________________________________
车次      91    20
合计      135    2 =SUM(F$93:F$134)      =SUM(H$93:H$134)    =SUM(J$93:J$134)  =SUM(J135:M135)     
__________________________________________________
车次      139    20
合计      222    2 =SUM(F$141:F$221)      =SUM(H$141:H$221)   =SUM(J$141:J$221) =SUM(J222:M222)           
__________________________________________________
车次      173    20
合计      222    2 =SUM(F$175:F$221)      =SUM(H$175:H$221)   =SUM(J$175:J$221) =SUM(J222:M222)           
__________________________________________________
车次      225    20
合计      256    2 =SUM(F$227:F$255)      =SUM(H$227:H$255)   =SUM(J$227:J$255) =SUM(J256:M256)           
__________________________________________________
车次      260    20
合计      292    2 =SUM(F$262:F$291)      =SUM(H$262:H$291)   =SUM(J$262:J$291) =SUM(J292:M292)           
__________________________________________________
车次      296    20
合计      332    2 =SUM(F$298:F$331)      =SUM(H$298:H$331)   =SUM(J$298:J$331) =SUM(J332:M332)           
__________________________________________________
车次      335    20
合计      385    2 =SUM(F$337:F$384)      =SUM(H$337:H$384)   =SUM(J$337:J$384) =SUM(J385:M385)           
__________________________________________________
车次      389    20
合计      404    2 =SUM(F$391:F$403)      =SUM(H$391:H$403)   =SUM(J$391:J$403) =SUM(J404:M404)           
__________________________________________________
车次      407    20
合计      483    2 =SUM(F$409:F$482)      =SUM(H$409:H$482)   =SUM(J$409:J$482) =SUM(J483:M483)           
__________________________________________________
车次      486    20
合计      517    2 =SUM(F$488:F$516)      =SUM(H$488:H$516)   =SUM(J$488:J$516) =SUM(J517:M517)           
__________________________________________________
车次      520    20
合计      567    2 =SUM(F$522:F$566)      =SUM(H$522:H$566)   =SUM(J$522:J$566) =SUM(J567:M567)           
__________________________________________________
车次      570    20
合计      603    2 =SUM(F$572:F$602)      =SUM(H$572:H$602)   =SUM(J$572:J$602) =SUM(J603:M603)           
__________________________________________________

你看cell N1 N2 N3 N63 N64 N65，这个个格子本来不需要求和，结果还是显示了 15# zhaozyuan

去掉.Resize(r2.Row - r.Row - 2, 1)

去掉后每一车次就只有最后一行有合计了。除了表头和结尾其他行都要求和。 17# zhaozyuan

18# nirdong
你不早说 害得我花了那么多时间 还是没达到你要求 你自己看着办吧

非常感谢你的耐心回复。我找到解决的办法了，改了下代码。
Sheet1.Select
    Dim r As Range, r2 As Range
    For Each r In [T:T].SpecialCells(xlCellTypeConstants, 2)
            If Len(r) Then
            Set r2 = r.Offset(, -18).Resize(50000).Find("合计")
            r2.Offset(, 4).Resize(1, 1) = "=sum(r" & r.Row + 2 & "c:r" & r2.Row - 1 & "c)"
            r2.Offset(, 6).Resize(1, 1) = "=sum(r" & r.Row + 2 & "c:r" & r2.Row - 1 & "c)"
            r2.Offset(, 8).Resize(1, 8) = "=sum(r" & r.Row + 2 & "c:r" & r2.Row - 1 & "c)"
            r2.Offset(, 7).Resize(1, 2) = "=sum(r" & r.Row + 2 & "c:r" & r2.Row - 1 & "c)"
            r2.Offset(-(r2.Row - r.Row - 2), 12).Resize(r2.Row - r.Row - 2, 1) = "=sum(rc[-4]:rc[-1])"
            End If
    Next
19# zhaozyuan