Compter nombre d'occurence d 'un caractères

[Philippe]

Bonjour,

Je suis à la recherche d'une formule me permettant de compter le nombre de fois qu'un caractère (en l'occurence un pipe '|') est présent dans une cellule.
J'ai beau me creuser les méninges je n'ai pas trouvé de solution...
Est ce que l'un d'entre vous a une idée ?
Philippe

 

[andré]

Salut,

Si tu comptes le nombre de caractères de la chaîne : =nbcar()
et que tu en soustrais le nombre de caractère après avoir supprimé le caractère que tu veux compter : nbcar(substitue())
tu obtiendras le nombre de caractères recherché.

Exemple :
En A1 : acadabra
et tu désires compter le nombre de : a
=NBCAR(A1)-NBCAR(SUBSTITUE(A1;'a';''))
te renverras 4

Ândré.

 

[Sylvie]

Bonjour Philippe, bonjoru André

j'allais justement dire à Philippe de faire un tour sur ce lien qui émane d'un membre imminent de ce forum Lien supprimé
😉

Bonne journée

 

[2passage]

Bonjour,

Ah ben, je n'y aurais jamais pensé.. la preuve : je me suis précipité pour faire une fonction perso.... (tout en écrivant, avant de voir le message d'André, que je ne doutais pas qu'un formuliste de génie viendrait me scotcher, évidemment..).. Enfin.. voila toujours une fonction qui fait ca :

Public Function Occurence(Texte As Range, Caractere As String) As Integer
Dim i As Integer
Application.Volatile
On Error GoTo gereerr
Occurence = 0
If Len(Caractere) <> 1 Then GoTo gereerr
For i = 1 To Len(Texte.Value)
    If Mid(Texte, i, 1) = Caractere Then Occurence = Occurence + 1
Next i
Exit Function
gereerr:
Occurence = '#VALEUR'
End Function

A+

 

[Philippe]

Merci beaucoup pour vos réponse.
Cela m'enlève une bonne épine du pied.
Bonne journée.
Philippe

 

[andré]

Salut Philippe,

Heureux d'avoir pu te rendre service.

N'écoute surtout pas ce que te disent Sylvie40 et 2passage (que je salue aussi au passage) à mon sujet , c'est n'importe quoi (mais que je remercie quand même pour leur appréciation).

Au fait, mon post précedent, je l'avais déjà oublié !

Ândré.