Microsoft 365 Recherche 3 mots…

[moanin]

Bonsoir à tous



Quelqu’un pourrait-il me dire quelle fonction utiliser pour rechercher dans une colonne des lignes comportant par exemple trois mots ?


ex :

Pierre Granier-Deferre
ou
Pierre Granier Deferre

(Il peut y avoir ou pas un tiret)

Merci

 

[sylvanu]

Bonsoir Moanin,
Vraiment succinct comme demande ....
Alors cette formule vous donne le premier trouvé dans la colonne A :

=EQUIV("Pierre*Granier*Deferre*";A:A;0)

 

[moanin]

Xcuses…
Je ne cherche pas "Pierre Granier Deferre" c’est un exemple; je cherche les lignes d’une colonne qui contiennent 3 mots, 3 occurrences, 3 valeurs n’importe lesquels :
Pierre Granier Deferre
Jean Paul Leblanc
Marc Antoine Lucillius
…
> Mais pas :
Jean Moulin
ni
André Malraux

 

[moanin]

J’ai trouvé cette formule mais il semble qu’elle est matricielle et je n’y ai pas accés (Excel 365 pour Ipad)

=SOMME(NBCAR(plage)-NBCAR(SUBSTITUE(plage,"texte","")))/NBCAR(« texte »)

 

[job75]

Bonjour moanin, sylvanu,

Voyez le fichier joint et cette formule matricielle en B2 :

=SIERREUR(INDEX(A:A;PETITE.VALEUR(SI((ESTNUM(CHERCHE(" * ";SUPPRESPACE(A$2:A$100)))+ESTNUM(CHERCHE(" *-";A$2:A$100)))*ESTERREUR(CHERCHE(" * * ";SUPPRESPACE(A$2:A$100)))*ESTERREUR(CHERCHE("-*-*";A$2:A$100));LIGNE(A$2:A$100));LIGNE(B1)));"")

Si votre Ipad ne l'accepte pas prenez un PC.

A+

 

[moanin]

Merci

A quoi correspond B1 à la fin de la formule ?

 

[job75]

A quoi correspond B1 à la fin de la formule ?

LIGNE(B1) = 1 pour la formule en B2, s'incrémente en dessous.

 

[moanin]

Ok, j’essaye.

 

[RyuAutodidacte]

Peut être avec un filtre avancé, exemple succinct :

 

[RyuAutodidacte]

Mettre une étoile de chaque coté des mots recherchés enfin de prendre compte le texte qui pourait être à gauche et à droite :

 

[mapomme]

Bonsoir à tous,

Pour O365, essayez cette formule (le texte est en A1) :

=LET(X;SUPPRESPACE(SUBSTITUE(A1;"-";" ")); nbr; NBCAR(X)+1-NBCAR(SUBSTITUE(X;" ";""));SI(nbr=3;SUPPRESPACE(A1);""))

 

[moanin]

Merci à tous, la solution de mapomme fonctionne parfaitement

 

[job75]

Bonjour le forum,

On peut aussi utiliser une fonction VBA :

Function Extraire_3_mots(colonne As Range, ordre&) As String
Dim tablo, i&, s, n&
tablo = Intersect(colonne, colonne.Parent.UsedRange) 'matrice, plus rapide
For i = 1 To UBound(tablo)
    s = Split(Application.Trim(Replace(tablo(i, 1), "-", " ")))
    If UBound(s) = 2 Then
        n = n + 1
        If n = ordre Then Extraire_3_mots = tablo(i, 1): Exit Function
    End If
Next
End Function

A+