Tælle bestemt tegn eller bogstav i en celle

Her er en funktion der kan tælle tegn, i en celle.

Den skal være i et modul, ikke et arkmodul.

Public Function TældTegn(ByVal Streng As String, Tegn As String)
X = 0
For i = 1 To (Len(Streng) + 1) - Len(Tegn)
If Mid(Streng, i, Len(Tegn)) = Tegn Then
X = X + 1
End If
Next
TældTegn = X
End Function


det andet om at tilføje i en celle automatisk, er sværere, kan give mange problemer.

Men du kan da bare klikke op i formellinien og skrive der.

Følgende formel klarer dit problem:
=LEN(A15)-LEN(SUBSTITUTE(A15;",";""))

På dansk
=LÆNGDE(A15)-LÆNGDE(ERSTAT(A15;",";""))

Du kan ikke umiddelbart tilføje noget til en celle, men du kan taste F2 for at komme til at redigere cellen og derefter "END" for at gå til slutningen af det, som står der i forvejen. Her kan du så tilføje det du ønsker og trykke ENTER.

tror dette er mere rigtigt på dansk, Jan
=LÆNGDE(A15)-LÆNGDE(UDSKIFT(A15;",";""))

Nå ja, du har ret :-)

Det er jo REPLACE som hedder ERSTAT ....