Extraire valeur entre 2 champs

[dudumomo]

Bonjour a tous,

Je souhaite extraire une valeur entre 2 champs mais j'ai quelques difficulités.

Il me faut extraire la valeur entre "Model: " et "," ou "." ou ":" ou ";"

Voila quelques exemples:
Blablabla, Model: 123, blablabla ===> Doit me rendre 123
Blablabla Model: 123, blablabla ===> Doit me rendre 123
Blablabla. Model: 123. blablabla ===> Doit me rendre 123
Blablabla, Model: 123; blablabla ===> Doit me rendre 123

Des idées sur comment faire?

Je passait par:
=IFERROR(MID(LEFT(A1,SEARCH(",",A1)-1),SEARCH("Model: ",A1)+7,LEN(A1)),"")
avant, mais la vu que j'ai plusieurs signes de ponctuations...et surtout si il y avait une virgule avant Model: la formule ne fonctionnait plus.

Merci de votre aide

 

[BOISGONTIER]

Re : Extraire valeur entre 2 champs

Bonjour,

S'il n'y a qu'une valeur numérique dans la chaîne

=STXT(A1;EQUIV(VRAI;ESTNUM(CNUM(STXT(A1;LIGNE($1:$255);1)));0);NB(--(STXT(A1;LIGNE($1:$255);1))))
valider avec maj+ctrl+entrée

Formules Matricielles

JB

 

[dudumomo]

Re : Extraire valeur entre 2 champs

Ah, mon erreur, il ne s'agit pas de valeur numérique (Quelque fois, mais peu souvent).

Vous avez une autre idée?

Merci

 

[Paf]

Re : Extraire valeur entre 2 champs

Bonjour dudumomo, BOISGONTIER,

un essai par fonction personnalisée (à copier dans un module standard et utiliser comme une fonction normale)

Function Extrait(Cel)
 Dim Signe, Deb As Byte, Fin As Byte
 Signe = Array(",", ".", ":", ";")
 Deb = InStr(1, Cel, "Model:", 1)
 Deb = Deb + 6
 For i = LBound(Signe) To UBound(Signe)
    Fin = InStr(Deb, Cel, Signe(i))
    If Fin > 0 Then Exit For
 Next
 Extrait = Mid(Cel, Deb, Fin - Deb)
End Function

fonctionne pour les exemples fournis, à vérifier pour toutes les configurations.

A+

 

[dudumomo]

Re : Extraire valeur entre 2 champs

Bonjour,
Je pense que c'est une bonne solution en effet.
En revanche, la fonction me donne tout le temps 0

Je sais pas trop ou est le probleme....

Merci

 

[Paf]

Re : Extraire valeur entre 2 champs

re,

Si les données à traiter sont en plage A1:A20 (par ex.) en B1 : =Extrait(A1) puis tirer vers le bas

sans classeur contenant quelques données à traiter, difficile de dire ce qui ne va pas ( structure des données ...)

A+

 

[dudumomo]

Re : Extraire valeur entre 2 champs

Bonjour,
Bon ca fonctionne maintenant...j'avais du faire des modifications...

Cependant j'ai encore quelques problemes.
J'ai des trucs en vietnamien comme:
=> Bộ cung cấp nguồn một chiều DC gồm 1 rack chứa 04 mô đun nguồn Flatpack 2 3000 HE,1module điều khiển,2cảm biến nhiệt,1chống sét AC,1chống sét DC, nguồn đầu vào AC...; Hsx:Eltek Power;Mới 100%
==> Il n'y a pas de Model: la dedans et devrait donc ne rien afficher.

=> Bộ nguồn cấp điện liên tục, Model: 9395: mỗi,
==> Ca me donne "Model: 9395: mỗi", il faudrait me donner "9395" seulement

Merci de votre aide.

 

[CISCO]

Re : Extraire valeur entre 2 champs dans une phrase

Bonjour

Une possibilité avec une formule.

@ plus

 

[dudumomo]

Re : Extraire valeur entre 2 champs

Merci encore Cisco,

Ca fonctionne pas trop mal sauf sur:

Bộ nguồn cấp điện liên tục(Prod) hiệu Chepmi mới100% model:ABB600 (evalue codeXa4242)
Bộ nguồn cấp diện liên tục Prod - Model:ABE4587 (hàng mới 100%)

Peut etre en rapport avec les parenthèses? (je n'avais pas pensé a cela)

Merci!

 

[CISCO]

Re : Extraire valeur entre 2 champs

Bonjour

Merci encore Cisco,

Ca fonctionne pas trop mal sauf sur:

Peut etre en rapport avec les parenthèses? (je n'avais pas pensé a cela)

Merci!

Non, ce n'est pas à cause des parenthèses. La formule dans mon dernier fichier cherche le premier espace après le terme Model, et écrit les nombres juste après. Cela allait avec tes premiers exemples, pas avec les deux derniers car il ni y a pas d'espace devant les nombres à conserver !

@ plus

 

[CISCO]

Re : Extraire valeur entre 2 champs

Bonjour

Une autre possibilité en pièce jointe.

@ plus

P.S : Cette fois-ci, la recherche est faite par rapport à l'espace, à la virgule,..., c-à-d aux critères que tu as cités dans ton premier post.

 

[dudumomo]

Re : Extraire valeur entre 2 champs

Ca fonctionne tres bien!

Merci beaucoup Cisco!