cpter le nbre de caractere precis ds un mot

Essaie ça:

En A1 = Hello

=NBCAR(A1)-NBCAR(SUBSTITUE(A1;"l";""))

Total de l dans hello = 2

Starwing

-----Message d'origine-----
Bonjour,

Sauriez-vous quelle est la fonction qui permet de compter
le nombre de "a"

ou de "b" ou de "x" par ex dans un mot ?

Exemple :
dans le mot "hello" je dois trouver :
nombre de h : 1
nombre de e : 1
nombre de l : 2
nombre de o : 1

(Je ne veux pas compter le nombre total de lettres mais
le total par

lettre...)

Merci pour vos réponses,
Céline.


.

Salut Céline

un exemple
=NBCAR(A1)-NBCAR(SUBSTITUE(A1;"l";""))
pour trouver le nombre de l
--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"news.microsoft.com" <celine> a écrit dans le message de news:
OnvUEbwdDHA.2312@TK2MSFTNGP12.phx.gbl...

Bonjour,

Sauriez-vous quelle est la fonction qui permet de compter le nombre de "a"
ou de "b" ou de "x" par ex dans un mot ?

Exemple :
dans le mot "hello" je dois trouver :
nombre de h : 1
nombre de e : 1
nombre de l : 2
nombre de o : 1

(Je ne veux pas compter le nombre total de lettres mais le total par
lettre...)

Merci pour vos réponses,
Céline.

Nbre de "H" sans tenir compte de la casse :

=NBCAR(A1)-NBCAR(SUBSTITUE(MAJUSCULE(A1);"H";""))

AV

Bonjour

Voici une fonction trouvée sur vbusers.com
(auteur: Andrew Baker)

J'ai testé, ca fonctionne

Marc.

The code below returns the number of instances of a string within another
string.

'Purpose : Counts the number of instances of a specified string within
another string.
'Inputs : sText The string to search in.
' sSearchFor The string to search for.
' [bIgnoreCase] If True does a case insensitive
comparison.
' [sIgnoreText] If specified will ignore items
between subsequent instances of
' "sSearchFor" which match this text
(see example 2)
'Outputs : Returns the number of instances of the string.
'Author : Andrew Baker
'Date : 03/09/2000 13:58
'Example : eg. Find the instances of the character "A" within a string
' 1.
' Debug.Print CountString("ABCAA","A")
' Returns 3.

' Now find how many lines of data are contained within a
string, ignoring any blanks lines.
' 2.
' Debug.Print CountString("ANDREW" & vbnewline & "BAKER" &
vbnewline & vbnewline & "IS" & vbnewline & "GREAT!" &
vbnewline,vbnewline,,"")
' Returns 3 (NOT 4).
'Revisions :

Function CountString(sText As String, sSearchFor As String, Optional
bIgnoreCase As Boolean = True, Optional sIgnoreText) As Long
Dim asItems() As String, lThisItem As Long
On Error GoTo ErrFailed

If bIgnoreCase Then
asItems = Split(UCase$(sText), UCase$(sSearchFor))
CountString = UBound(asItems)
Else
asItems = Split(sText, sSearchFor)
CountString = UBound(asItems)
End If

If IsMissing(sIgnoreText) = False Then
'Deduct any items which contain the specified "sIgnoreText"
For lThisItem = 0 To UBound(asItems) - 1
If asItems(lThisItem) = sIgnoreText Then
'Deduct this item
CountString = CountString - 1
End If
Next
End If

Exit Function

ErrFailed:
'Error occurred
Debug.Print Err.Description
Debug.Assert False
CountString = 0
End Function


"news.microsoft.com" <celine> a écrit dans le message de news:
OnvUEbwdDHA.2312@TK2MSFTNGP12.phx.gbl...

Bonjour,

Sauriez-vous quelle est la fonction qui permet de compter le nombre de "a"
ou de "b" ou de "x" par ex dans un mot ?

Exemple :
dans le mot "hello" je dois trouver :
nombre de h : 1
nombre de e : 1
nombre de l : 2
nombre de o : 1

(Je ne veux pas compter le nombre total de lettres mais le total par
lettre...)

Merci pour vos réponses,
Céline.