基于特定标准计算Excel中的多个项目

Question

我查看了其他问题，找不到我需要的东西。

如果我解释如下，那就最好：

我有一个包含三列的电子表格：

产品名称 供应商

有些供应商拥有相同的产品。

我需要计算供应商有多少产品名称相同。

非常感谢所有帮助。

谢谢，

user1114330

Answer 1

将此公式粘贴到单元格C1

中

 =SUMPRODUCT(($A$1:$A$10=A1)*($B$1:$B$10=B1))

<强>快照

但是，如果您仍想要VBA，请参阅此

Option Explicit

Sub Sample()
    Dim ws As Worksheet
    Dim lrow As Long

    Set ws = Sheets("Sheet1")

    With ws
        lrow = .Range("A" & .Rows.Count).End(xlUp).Row
        .Range("C1:C" & lrow).Formula = "=SUMPRODUCT(($A$1:$A$" & lrow & _
                                        "=A1)*($B$1:$B$" & lrow & "=B1))"
    End With
End Sub