我想每 10 行創建一個摘要。
|Col-A |Col-B |Col-C |Col-D |Col-E|Col-F|Col-G |Col-H|
====================================================================
|InvoiceNo|TotalAmount Tax|TotalTax|PartNo|Qty |Price|Amount|Tax |
--------------------------------------------------------------------
|Invoice-A|12540 |1140 |0001 |3 |100 |300 |30 |
|Invoice-A|12540 |1140 |0003 |6 |300 |1800 |180 |
|Invoice-A|12540 |1140 |0002 |5 |200 |1000 |100 |
|etc... |12540 |1140 |xxxx |x |xxx |xxxx |xxx | --10th row
|Invoice-B|xxxxx |xxxx |xxxx |x |xxx |xxxx |xxx | --11th row
概括
我有這樣的下一個回圈代碼
'Total amount Total tax
rw = 10
For j = 2 To lastRow Step 10
sht.Range("B" & lastRow).Formula = "=SUM(H" & t & ":H" & rw & ") SUM(G" & j & ":G" & rw & ")"
rw = rw 10
Next j
'Tax
rw = 10
For t = 2 To lastRow Step 10
sht.Range("C" & lastRow).Formula = "=SUM(H" & t & ":H" & rw & ")"
rw = rw 10
Next t
任何想法創建每個發票編號的 10 行摘要？
uj5u.com熱心網友回復：
如果您想通過各個發票編號來匯總值，您可以創建一個包含唯一發票編號的串列，然后針對這些唯一值進行 SUMIF（直接作為不帶 VBA 的單元格函式）
如果你想每 10 行求和，你可以通過添加一個索引列來呼叫前 10 行 1，接下來的 10 行 2，等等。然后通過 SUMIF 對 UNIQUE 索引號執行與上述相同的操作。
或從 1 .. 10、1 .. 10 等重復設定索引列的行（第 1 行與第 11 行相加，第 2 行與第 12 行相加等）
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/489185.html