VBA Excel 对范围内具有特定值的单元格进行计数

VBA Excel count cells in a range with a specific value

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

使用这个:

=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