Extraire un texte noyé sans logique

[masteur907]

Bonjour,

J'ai avant tout fait quelques recherche sans pouvoir trouver solution à ma problématique du moment.

Actuellement je suis face à une colonne (cf pièce jointe) dans laquelle je souhaite extraire un texte de dimention variable placé à un endroit dans la cellule variable.

Si quelqu'un à une idée je suis preneur.

Vous remerciant.

Cordialement.

 

[Tibo]

Re : Extraire un texte noyé sans logique

Bonjour,

Un essai en B2 :

=STXT(A2;TROUVE("µ";SUBSTITUE(A2;CAR(160);"µ";NBCAR(A2)-
NBCAR(SUBSTITUE(A2;CAR(160);""))))+1;99)

Les espaces dans tes chaines sont particuliers (code ASCII 160).

On peut ajouter en début de formule un test pour les cellules vides.

Je te laisse tester

Bon app

@+

 

[smotty]

Re : Extraire un texte noyé sans logique

Bonjour,

Voici une approche vba

Voire le fichier joint (le code étant entré dans un module)

Il suffit de tapper ex: =Extrait(A2)

Je bloquais pour les formules

Il retire tout caractère dont le code ascii est inférieur à celui du A et supérieur à Z.

A+

 

[masteur907]

Re : Extraire un texte noyé sans logique

Bonjour,

Merci Thibo pour la réponse qui fonctionne à merveille dans mon exemple mais malheuresement pas sur mon fichier source.

J'aimerai pouvoir comprendre également ta réponse pour ma culture perso qui pourra m'aider à utiliser d'autre fonction. Si tu pouvais m'aider sur ce point cela m'aiderai (nottament l'utilisation du caractère "µ") que je n'avais jamais croisé auparavant.

J'espère ne pas abuser.

Cordialement.

 

[MJ13]

Re : Extraire un texte noyé sans logique

Bonjour masteur, Tibo, Smotty

Tibo et Smotty, belles demos a garder.

Cela sert aussi a cela XLD.

 

[Tibo]

Re : Extraire un texte noyé sans logique

re,

masteur,

le principe de l'utilisation du caractère µ est :

Dans ta chaine, il faut repérer le dernier caractère ASCII 160 (pseudo espace).

Avec la fonction NBCAR, je détermine le nombre de caractères code 160 et je remplace le dernier (avec SUBSTITUE) par le caractère µ

Ensuite, avec la fonction TROUVE, il me reste à trouver l'emplacement de ce caractère puis à extraire à compter du caractère suivant.

Pourquoi ce caractère : tout simplement parce que la probabilité qu'il soit déjà présent dans ta chaine de caractères est très très faible.

Voilou pour la tentative d'explication.

Si problème persiste, tu peux revenir avec un extrait de fichier plus représentatif de ton vrai fichier.

@+

 

[masteur907]

Re : Extraire un texte noyé sans logique

Merci à Tibo et smotty pour leurs réponses.

Néanmoins je suis bloqué sur les cellules ayant un espace après la chaine de caractère que je dois extraire. Cf les cases oranges fichier Excel exemple 2.

Avez vous une idée ?

Cordialement,

 

[smotty]

Re : Extraire un texte noyé sans logique

Essaye donc ça,

Pour info, si vba t'intéresse, j'ai juste ajouté la fonction trim() qui enlève les espaces avant et après.

 

[tototiti2008]

Re : Extraire un texte noyé sans logique

Bonjour à tous,

trés en retard, une proposition de formule...

=SI(ESTERREUR(CHERCHE(CAR(160);A2));"";SUBSTITUE(DROITE(A2;NBCAR(A2)-CHERCHE(CAR(160);A2));CAR(160);""))

 

[masteur907]

Re : Extraire un texte noyé sans logique

J'ai toujours pas résolu mon problème malgrès toute votre bonne volonté.

Afin de levé le doute sur les espace j'ai joint le fichier source.
Car je pense que le problème vient de la.

Cordialement,

 

[smotty]

Re : Extraire un texte noyé sans logique

Me revoilà,

Voici ce que j'ai pu faire

Cordialement

 

[MJ13]

Re : Extraire un texte noyé sans logique

Re bonjour

Bravo Smotty, des petites macro comme on aimerait en voir tout les jours.

 

[smotty]

Re : Extraire un texte noyé sans logique

bonsoir à tous,

Dans ce fichier joint j'ai mis dans le mille.

la fonction s'appelle extrait2 et ça fonctionne



Cordialement

 

[CBernardT]

Re : Extraire un texte noyé sans logique

Bonjour à tous,

Bravo Smotty, bien vu les fonctions imbriquées

Une autre solution, peu différente, avec une liste préexistante de noms et une fonction simplifiée. Dans l'exemple, la "Liste" est définie dans la feuile "DONNEES".

Un petit avantage : n'apparaissent que les noms présents dans la liste, ce qui donne la possibilité de trier les enregistrements présents dans la base.

Cordialement

Bernard

 

[smotty]

Re : Extraire un texte noyé sans logique

Bonjour Le Forum, Bonjour Bernard,

Ta solution est génial et particulièrement simple. (quand je vois le temps que j'ai mis...)

Je dois t'avouer que je ne connaissais pas ce procédé et si tu peux m'expliquer ça sera très bien pour ma culture.

Ce procédé pour créer un tableau de la chaine je ne l'ai jamais utilisé mais je le garde en mémoire.

Si tu peux m'expliquer le reste ça m'arrangera

Merci d'avance

Smotty