发布网友 发布时间:2022-02-23 01:02
共4个回答
热心网友 时间:2022-02-23 02:32
按你的要求每变动一列行号加3;
所以公式为: =SUM(INDIRECT("A"&COLUMN(A1)*3-2&":A"&COLUMN(A1)*3))
如图所示:
热心网友 时间:2022-02-23 03:50
可以用int+row+if+sum 配合使用
=IF(ROW()/2=INT(ROW()/2)=TRUE,SUM(A1:A2),"")
结果
热心网友 时间:2022-02-23 05:24
Sub aa()
Dim i, j, k As Integer
j = Range("a" & Cells.Rows.Count).End(xlUp).Row
k = 3
For i = 1 To j Step 3
Range("b" & k) = Cells(i, 1) + Cells(i + 1, 1) + Cells(i + 2, 1)
k = k + 3
Next
End Sub
热心网友 时间:2022-02-23 07:16
=SUM(OFFSET($A$1,ROW()*3-3,,3))