Excel VBA sub 用 Countifs 填充列
Excel VBA sub to fill a column with Countifs
我想自动化一个 Sub 例程来处理 15000 行。我有客户说电脑、vdi 和其他 IT 设备。每行记录客户的姓名及其拥有的 IT 设备。我分析了每个客户拥有多少台计算机，但为此我需要计算重复项。基本上我想输出结果填充到最后一行（每次都更改行）。
非常感谢
因为它是一个简单的 1-liner:
Range("N2:N" & Cells(Rows.Count, 11).End(xlUp).Row).Formula = "=COUNTIFS(C[-3],RC[-3],C[-1],1)"
我想自动化一个 Sub 例程来处理 15000 行。我有客户说电脑、vdi 和其他 IT 设备。每行记录客户的姓名及其拥有的 IT 设备。我分析了每个客户拥有多少台计算机，但为此我需要计算重复项。基本上我想输出结果填充到最后一行（每次都更改行）。
非常感谢
因为它是一个简单的 1-liner:
Range("N2:N" & Cells(Rows.Count, 11).End(xlUp).Row).Formula = "=COUNTIFS(C[-3],RC[-3],C[-1],1)"