VBA Excel计数具有特定值的范围中的单元格

我正在寻找一种方法来计算具有特定值的范围内的单元格的数量，但如果它们具有相同的值，则将跳过位于先前单元格旁边的单元格。 所以如果我有1,2,3,3,4,3这样的系列，3的数目的结果是2。

Answer 1

用这个：

 =COUNTIF(A:A,3)-COUNTIFS(A1:A1040000,3,A2:A1040001,3) 

---

编辑：

以下公式也适用：

 =COUNTIFS(A1:A1040000,3,A2:A1040001,"<>" & 3) 

在vba中：

 Dim output as Long With AcitveSheet output = Application.WorksheetFunction.Countifs(.Range("A1:A1040000"),3,.Range(A2:A1040001),"<>" & 3) End With Debug.Print output