Antal af et bestemt tegn i en kolonne

Du kan lave en makro count (tast Alt+F8 indtast count og tryk opret. Overskriv den tomme funktion med nedenstående:

Function count(r As Range, s As String) As Integer
    Dim c As Range
    Dim i, p, n As Integer
   
    n = 0
   
    For Each cell In r
      Set c = cell
      p = 1
      i = -1
      While i <> 0
        i = InStr(p, c, s)
        If i > 0 Then
            n = n + 1
            p = i + Len(s)
        End If
      Wend
    Next
    count = n
End Function

I den celle du vil have sammentællingen i skriver du =count(A1; A2)
Dette vil give resultatet af antallet af forekomster af værdien i A2 i værdien i A1.

Du kan også skrive =count(A1; "%") for blot at søge på en fast værdi.
Du kan desuden angive et område, ex. =count(A1:A10; "%")

hvis jeg laver denne:

=COUNT(C16:C100,"***")
så skriver den bare 0, men der er mindst 5 stk.

Hvis din Excel er engelsksproget, så er navnet Count allerede brugt.
Ændr navnet:
Function count(r As Range, s As String) As Integer
til
Function countit(r As Range, s As String) As Integer
og
count = n
til
countit = n

Bemærk at koden ovenfor tæller
=countit("***")  som 1 i dit eksempel
og
=countit("*")  som 6 (*+**+***) i dit eksempel