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

Question

我正在寻找一种方法来计算具有特定值的范围中的单元格数，但如果它们具有相同的值，则会跳过前一单元格旁边的单元格。因此，如果我有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