Question

如果有办法使用sumif结合countif？

例如，如果我有

TransactionNo|NumberToSum
    1        |  
    1        |  9
    2        |  6
    3        |  3
    4        |  
    4        |  4
    5        |  6
    6        |  4
    7        |  
    7        |  9
    8        |  7
    9        |  4
    10       |  
    10       |  1
    11       |  3
    12       |  6

我的结果是： 23

因为值1,4,7,10是重复的，所以在这种情况下我需要对NumberToSum的{{1}}求和。

理想情况下，我想要一些9,4,9,1

的行

如果A：A内部的A的计数> 1，则对B求和。 1。

但=SumIf(A:A,Count>1,B:B)不起作用。

注意： 数据 NOT 按照我的示例中的显示进行排序。

如果我想在VBA中这样做，可以通过以下方式快速完成：

=SUMIF(A:A,COUNT(A:A)>1,B:B)

我尝试的另一个选项是添加一个公式为

的列

Sub sumdups()
Dim rng As Range
Dim rng2 As Range
Dim Sum As Long

Set rng = [A2:A17]

For Each rng2 In rng
    If WorksheetFunction.CountIf(Range("A1:A17"), rng2.Value) > 1 Then
        Sum = Sum + rng2.Offset(0, 1).Value
    End If
Next rng2
End Sub

然后总结辅助列，但我希望有一个简单的公式可以在一个单元格中完成相同的操作。

我真的只是在寻找一个可以在单个单元格中输入的更快的公式，而无需任何额外的计算。

Answer 1

这个公式对我有用：

=SUMPRODUCT(1*(COUNTIF(A1:A100,A1:A100)>1),(B1:B100))

或整列（稍慢）：

=SUMPRODUCT(1*(COUNTIF(A:A,A:A)>1),(B:B))

获取仅重复值的总和

1 个答案: