EXCEL : Traitement chaine de caracteres

Question

Bonjour, 
Je cherche une formule ou ensemble de formules sous excel qui me permettent de retrouver le nombre d'occurence d'une chaine de caracteres. Autrement dit sur un exemple : la cellule contient "TATA TOTO TATA TITI" , je cherche le nombre de fois où est ecrit "TATA" le nombre de TATA =2.
Est-ce quelqu'un aurait une idée de comment faire cela simplement sans passer par le VBA ?

Merci de votre aide

FF

xkristi · Accepted Answer

eh bien Eriiic bravo !
je ne fais pas mieux !
Bonne soirée !

xkristi · Answer

Bonjour !

NB.SI(A2:A6;"titi")

n'oublie pas de mettre le statut résolu si c'est le cas

eriiic · Answer

Bonjour,

Hummm, je crois que le texte est dans 1 cellule xkristi.

Si tu n'es pas limité en cellules tu peux utiliser CHERCHE(chaine;texte;n° départ) successivement en utilisant comme n°_départ le résultat précédent+1

ex:
                A
1   TATA TOTO TATA TITI
2   =CHERCHE("TATA";A$1;1)
3   =CHERCHE("TATA";A$1;A2+1)
4   =CHERCHE("TATA";A$1;A3+1)
5   =CHERCHE("TATA";A$1;A4+1)
6   =CHERCHE("TATA";A$1;A5+1)
7   =CHERCHE("TATA";A$1;A6+1)
8   =CHERCHE("TATA";A$1;A7+1)
9   =NB(A2:A8)

résultat:
TATA TOTO TATA TITI
1
11
#VALEUR!
#VALEUR!
#VALEUR!
#VALEUR!
#VALEUR!
2

Reste à trouver la formule en 1 seule cellule ;-)
eric

xkristi · Answer

Salut !

Juste une  variante de disposition avec la fonction d'Eriiic qui a bien trouvé (  pas avec Trouve et avec CHERCHE) 

 mais pas possible en une cellule 
et reste le problème d'avoir un m^me mot 2 fois ou plus dans la chaine de caractères
TATA en A$1 peut être changé par un autre mot

en A$1 TATA  et la somme en B2 ou ailleurs 
TATA     	SOMME(B2:B6)	
	
TITI TATA TOTO TUTU	SI(ESTERREUR(CHERCHE(A$1;A2;1));0;1)	mets = et recopie incrément…
TOTO TITU	0	
TITU TOTO TATA TATA	1	ne compte que le premier TATA
TOTO TATA	1	
REVONS UN PEU	0

eriiic · Answer

Je ne l'avais pas précisé mais en A9, avec =NB(A2:A8), je retourne 2 qui est le total de TATA dans la chaine
eric

eriiic · Answer

Merci 
Bonne soirée à toi aussi :-)

Le Pingou · Answer

Bonsoir,
Oui xkristi ,on peut un peu plus si on passe par une petite macro ...
Très la passe de Eriiic...

Le Pingou · Answer

Bonjour fanfi_du_94,
Il est aussi possible de passer par une macro, basé sur la formule d’eriiic, complétée par xkristi, que voici : (à copier et coller dans la partie Déclarations d'une feuille)

Sub AnalyseChaine()
' Macro enregistrée le 11.10.2007 par Jean-Pierre Purro
Dim filtre As String
Dim nbpas, seaFilt As Integer

On Error GoTo SORTERROR
seaFilt = 0
filtre = Cells(1, 2)
nbpas = 0
Do While WorksheetFunction.Search(filtre, Cells(1, 1), 1 + seaFilt) > 0
        seaFilt = WorksheetFunction.Search(filtre, Cells(1, 1), 1 + seaFilt)
        nbpas = nbpas + 1
Loop
SORTERROR:
    Select Case Err.Number
        Case 1004
            If nbpas > 0 Then
                Cells(1, 3).Value = nbpas
            Else
                Cells(1, 3).Value = nbpas
            End If
        Case Else
            ' autre situations à traiter ici...
    End Select
End Sub

La chaine de donnée se trouve en A1. La chaine cherchée en B1. Le résultat en C1.
Il vous suffit de lancer la macro via Alt+F8 et clic sur AnalyseChaine

xkristi · Answer

Bonjour Le Pingou

Je ne sais si Fanfi du 94 va repasser chercher sa réponse ...

 merci pour la macro , un jour ou l'autre cela peut servir...
mais habituellement pour moi , c'est plutôt SQL et TCD

Le Pingou · Answer

Merci, de rein

eriiic · Answer

Pour le fun et bien ça n'interesse plus grand monde ;-)  en 1 cellule :

en A1: TATA TOTO TATA TITI
en A2: =(NBCAR(A1)-NBCAR(SUBSTITUE(A1;"TATA";)))/NBCAR("TATA")         => 2

eric

Le Pingou · Answer

Bonsoir,
Merci Eric, c'est super et beaucoup plus simple que mon code.
Je vais ranger et mémoriser précieusement cette combinaison, sans oublier d'étudier son fonctionnement.

xkristi · Answer

Bravo Eriiic 
ça m'étonne , pas devant le rugby ????????
Bonne soirée !

eriiic · Answer

Et non, pas devant le rugby, ma télé et moi on est en froid...
Bon, je vous rassure, j'ai trouvé l'inspiration ailleurs ;-)
Bonne soirée à tout le monde

Le Pingou · Answer

Bonsoir Eric,
Cette fonction "Substitue" gagne être bien connue et en combinaison avec "NbCar" cela devient de la mathématique élémentaire, un total moins la quantité restante et le tout divisé par le nombre de caractères cherché.
Encore bravo et merci de nous en faire profiter.

just1xpa2 · Answer

bonsoir pour le fun , ca m'interesse , eriiic le pinguoin , et xkristi
un  petit plus pour ameliorer la formule, pour eviter une erreur en modifiant A2 , tu saisie en B1 TATA
en A1: TATA TOTO TATA TITI 
 
en A2, a la place de cela  =(NBCAR(A1)-NBCAR(SUBSTITUE(A1;"TATA";)))/NBCAR("TATA") => 2 

tu formules ainsi A2==(NBCAR(A1)-NBCAR(SUBSTITUE(A1;B1)))/NBCAR(B1)  le resultat est le même , 

mais si tu recherche le nombre de fois TA par exemple  en  B1 , tu tapes exemple TA tu trouve 4
cela evite de changer dans la formule tout simplement ce que tu veux trouver 

mais je vous laisse la palme de la formule,

bonne soirée et encore bravo

Le Pingou · Answer

Bonjour,
Eh bien , désolé, j'ai essayer, votre proposition ne fonctionne pas.
Jean-Pierre

just1xpa2 · Answer

autant pour moi, et avec mes excuses la bonne formule est en A2 celle-ci 

=(NBCAR(A1)-NBCAR(SUBSTITUE(A1;B1;)))/NBCAR(B1)


il manquait le point virgule derrière de premier B1 dans la formule 


cela ne change pas que la palme vous revient,

Le Pingou · Answer

Bonjour,
J'ai tout contrôlé et j'ai fait un copier/coller votre formule et j'obtiens ceci #NOM? c'est inconpréhensile cette affaire. Avec l'autre formule de Eric c'est parfaitement correct.... j'enrage, c'est ou la bourde....

just1xpa2 · Answer

en A1tu ecris en minuscule comment ca marche 
en A2 copie/coller =(NBCAR(A1)-NBCAR(SUBSTITUE(A1;B1;)))/NBCAR(B1)
en B1 tu ecrit " ca  marche ", et en A2 tu trouvera  "1"

j'arrete la mon explication si tu ne comprend pas j'y peux plus rien pour toi

Le Pingou · Answer

Bonjour,
Désolé, j'ai suivi exactement vos consil et j'ai toujours la même erreur. Par contre avec la combinaison d'Eric sa roule parfaitement.
Il y a certainement un bug à quelque part non....

just1xpa2 · Answer

mets ici la combinaison copier coller d'eriic appliquer à ce texte que je demande "ca marche"

Vaucluse · Answer

Ca n'a peut être plus beaucoup d'importance, mais je confirme que cela fonctionne parfaitement avec la formule de justxpa2, identique à celled'Eric mais plus disponible puisqu'elle permet de traiter n'importe quel cacactére sur la même cellule.
A voir chez Le Pingou si le transfert copie n'a pas oublié quelque chose en route?Il faudrait vérifier la formule point par point
BCRDLMNT

just1xpa2 · Answer

ca me fait plaisir, elle est plus pratique pour la saisie, c'est tout, sinon, le fonctionnement est le même, je commencais a avoir des doutes, tien regarde ce lie, aussi je me ssuis amuser la, et ca marche impec aussi 
ajout

Le Pingou · Answer

Bonjour,
Merci infiniment de votre patience. L'information de Vaucluse m'a mis la puce à l'oreille, il y avait un disfonctionnement de mon logiciel que j'ai remis en ordre par l'option "Detecter et Réparer" qui se trouve dans "?" de la barre d'outils.
Tout est rentré dans l'ordre.
Toutes mes excuses pour le désagrément causé.

just1xpa2 · Answer

tien va faire un tour ici, 
exercice c divisible#dernier
mort de rire aussi

Le Pingou · Answer

Bonsoir just1xpa2,
Merci pour le tour proposé, par contre je ne suis pas mort de rire.

Vaucluse · Answer

Moi aussi j'y ai fait un tour et j'y ai rajouté une proposition assez complexe, mais peut être hors sujet.? Le périmètre des questions n'st pas toujours bien délimité.

Fanfi_du_94 · Answer

Bou dis donc.... faut suivre, 28 messages, si bien qu'à la fin j'étais plus tres sûr de la question posée...
Bon je vais relire tout cela a tête reposée et faire tri entre le grain et l'ivrée pour pouvoir lire le nombre de TATA dans cette fichue cellule.
En tous les cas merci de votre aide.

FF

just1xpa2 · Answer

post 11 suivi du 16 pour ameliorer avec une ereur reparer sur 18 qui nous donne le recapitulatif au post 20 ... bonne soirée et covhe question resolu,merci 



bonne soirée a toi -
Quand la base est saine, ceux qui interviennent derrière toi sont heureux 
à l'inverse, ils te maudissent ...

just1xpa2 · Answer

bonsoir bien vu le pinguoin justement, je cherchais, mais ne savait pas cette action, encore merci,

just1xpa2 · Answer

oh excusez moi, je n'ai pas fait exprès ,promis je ferais plus attention désormais,sans rancune,j'espère, et encore merci pour le petit rajout sur ma  formule  très sympa, mais je conserva les deux,ca peut toujours servir... bonne soirée a vous

Le Pingou · Answer

Bonsoir just1xpa2,
Merci. En plus come je travaille souvent en style de référence L1C1 je vous mets la formule correspondante pour vos archives..
=(NBCAR(L(-1)C)-NBCAR(SUBSTITUE(MINUSCULE(L(-1)C);MINUSCULE(L(-1)C(1));)))/NBCAR(L(-1)C(1))
Bonne soirée.

just1xpa2 · Answer

c'est quoi le style de reference L1C1 ? s'il vous plait...

just1xpa2 · Answer

ok merci et bonne soirée

EXCEL : Traitement chaine de caracteres

35 réponses

Votre réponse

Newsletters