comptabiliser mots dans des cellules

carinae

XLDnaute Junior
bonjour

je souhaiterais comptabiliser dans des cellules (ex ci-joint) les mots "Participant"(colonne B) et "connected"(colonne C et sans tenir compte du mot "disconnected" ) qui se trouvent integrés dans du texte.
j'ai essayé différentes methodes notamment en utilisant la formule NB.SI mais visiblement çà ne fonctionne pas.
Lorsque le mot se repete plusieurs fois dans une cellule cela n'est pas pris en compte

Quelqu'un pourrait me dire pourquoi et comment le regler ?

de plus je voudrais faire la même chose avec le mot "added" qui devrait parfois apparaitre en colonne C.
Pour information, je suis sous Excel 2010

Merci par avance
 

Pièces jointes

  • Classeur1.xlsx
    9.3 KB · Affichages: 48
  • Classeur1.xlsx
    9.3 KB · Affichages: 64
  • Classeur1.xlsx
    9.3 KB · Affichages: 55
Dernière édition:

david84

XLDnaute Barbatruc
Re : comptabiliser mots dans des cellules

Bonjour,
ci-joint une fonction personnalisée à tester :
Code:
Function CompteMot(Plage As Range, Mot As String) As Double
Dim oRegExp As Object, Matches As Object
Set oRegExp = CreateObject("vbscript.regexp")
With oRegExp
    .Global = True
    .MultiLine = True
    For Each c In Plage
        .Pattern = Mot
            If .test(c) = True Then
                Set Matches = .Execute(c)
                Nb = Nb + Matches.Count
            End If
    Next c
End With
CompteMot = Nb
End Function
Placer Option Compare Text en début de module.
A+
 

Pièces jointes

  • CompteMot.xls
    38.5 KB · Affichages: 45

carinae

XLDnaute Junior
Re : comptabiliser mots dans des cellules

Bonjour Rachid

çà me parait vraiment pas mal. Je ne connaissais pas cette fonction plafond ...
Ca fonctionne pour 1 ligne mais je vais devoir comptabiliser ce mot sur une plage. C'est possible ? A priori j'ai une erreur #valeur! lorsque j'etends la fonction sur un ensemble de cellules avec "nbcar"
 

david84

XLDnaute Barbatruc
Re : comptabiliser mots dans des cellules

Bonsoir,
une piste par formules à tester soigneusement (ce que je n'ai pas fait) :
Code:
=SOMME(NBCAR(B3:B6)-NBCAR(SUBSTITUE(B3:B6;"Participant";REPT(" ";NBCAR("Participant")-1))))
Formule matricielle à valider par Ctrl, Maj et entrée.
A+

Edit : ou
Code:
=SOMMEPROD(NBCAR(B3:B6)-NBCAR(SUBSTITUE(B3:B6;"Participant";REPT(" ";NBCAR("Participant")-1))))
en validation classique
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
314 450
Messages
2 109 726
Membres
110 552
dernier inscrit
jasson