excel VBA sub用Countifs填写一列

我想自动化一个Sub例程在15000行上工作。 我有客户，无论是电脑，VDI和其他IT设备。 每一行都是用户所拥有设备的客户名称logging。 我分析了每个客户有多less台计算机，但是为此我需要计算重复计数。 基本上我想输出结果填充到最后一行（每次行更改）。

非常感谢你

Answer 1

因为它是一个简单的一行：

 Range("N2:N" & Cells(Rows.Count, 11).End(xlUp).Row).Formula = "=COUNTIFS(C[-3],RC[-3],C[-1],1)"