Public Function CountEqual( _
ByVal vEqual As Variant _
, ParamArray vValues() As Variant _
) As Variant CountEqual(1, 4, 1, 5, 1, 6, 1) = 3
CountEqual(3, Array(1, 2, 3, 4)) = 1
CountEqual(150, SampleData) = 10See also: Count Function
StatVarType PropertyvEqual: The values whose number of occurrences within vValues is to be counted. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.