Count Number of appearances of a number in a column.
This function allows for looking number of appearances of a number – in whole column, parts either of a column or progressively (from here and downwards).
Example: Here I have chosen to see how many times the number 3 appears in B2 to B5, which is one time.
Public Function CountAp(find As Variant, lookin As Range)
Dim Count As Integer
For Each cell In lookin
If (cell.Value = find) Then Count = Count + 1 ‘
CountAp = Count