以下两种方法都可以实现次数统计:
Sub AutoCountIfA1() Range("C1:C5").Formula = "=COUNTIF($A$1:$A$15,B1)"End SubSub AutoCountIfR1C1() Range("C1:C5").FormulaR1C1 = "=COUNTIF(R1C1:R15C1,RC[-1])"End Sub
效果:
COUNTIF函数不可以吗,下面是1~5数字的例子: