如何在 Excel 的列中添加每第 n 个单元格?

How to add every nth cell in a column in Excel?

我有 2 个电子表格。

电子表格 1:A 列每 6 行有一个数字 电子表格 2:我想将 A 列中每第 6 个单元格中的每个数字添加到此电子表格的一个单元格中

Sheet2任意单元格中输入以下公式:

=SUM(Sheet1!A1:A60*(MOD(ROW(Sheet1!A1:A60),6)=0))

这是一个数组公式,因此请按 Ctrl+Shift+Enter 提交。

根据需要更改范围 A1:A60

您可以使用 VBA 宏来完成此操作。

Sub everySixth()
 Dim f As String
 f = "=Sheet1!A6"
 Dim i As Long

 For i = 1 To 5
  f = f & "+Sheet1!A" & (i * 6)
 Next

 ActiveCell.formula = f
End Sub

以防万一您想使用非数组公式,并且据我了解您希望每 6 个值相加一次。您可以在 sheet2 列 B1 上使用以下公式作为辅助列,并仅通过简单的输入来填写。我假设您的数据在两张纸的 A 列中。

 =IF(MOD(ROW($A1),6)+MOD(ROW(Sheet1!$A1),6)=0,A1+Sheet1!$A1," ")

快照显示获得的结果。

如果你想要总和,其他答案已经涵盖了。

我认为 sumproduct 是一个很好的解决方案。我们将要忽略的值乘以 0,将要保留的值乘以 1。

=SUMPRODUCT(--(MOD(ROW(A1:A16), 6)=0), A1:A16)