Compter le nombre d'occurence d'un car

Re,
Existe-t-il une fonction pour comptre le nombre d'occurences d'un meme caractère contenu dans une chaine.
Jusqu'a présent je 'splite' la chaine sur ce caractère

Merci

bonjour totoche le forum une methode parmi tant d'autres!! recherche e en cell d1

Code:

---

MsgBox Evaluate("SUM(NOT(ISERROR(FIND(""e"",MID(D1,ROW(1:" & Len([D1]) & "),1))))*1)")

---

Une fonction à déclarer dans un module public

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Function Repet(ByVal mot As String, ByVal c As String) As Integer Repet = 0 Do If InStr(mot, c) > 0 Then mot = Mid(mot, InStr(mot, c) + Len(c)) Repet = Repet + 1 Else Exit Do End If Loop End Function

---

Cherche le nombre d'occurrences c dans mot
c: peut être de plusieurs caractères!

par exemple, dans B1 mettre:
=Repet(A1;"am")
le résultat: le nombre d'occurrences "am" dans la cellule A1