Discussion :

[jphflo]

Bonjour à tous,

Dans une cellule Excel, je cherche à extraire une chaîne de caractères de la cellule A1. La chaîne de caractères est situés entre les deux tirets en partant de la droite du texte.

Exemple :

z15D - V1 - 13+34 - 14+65
z110 bis - V2BIS - 87+971 - 88+815
z45C - V1 - 397+975 - 398+250

Les Caractères à extraire sont soulignés et en gras.

Toutes mes tentatives d’extraction à l'aide d'une formule ne sont malheureusement pas satisfaisante.

Merci de bien vouloir me venir en aide

jphflo

[Raccourcix]

Bonjour

Vous ne précisez pas votre version d'Excel.

Avec 365 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=TEXTE.AVANT(TEXTE.APRES(A1;"-";2);"-")

Stéphane

[Tête de chat]

Bonjour

essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=TEXTE.AVANT(TEXTE.APRES(A1;"-";-2);"-")

avec peut-être un supprespace en plus...

[jphflo]

Bonsoir,

Merci pour vos réponses. Effectivement je n'ai pas précisé la version d'Excel... C'est modifier et je travail avec Excel 2013.

J'ai testé le code mais malheureusement il ne fonctionne pas, message renvoyé #NOM?

Cordialement,

jphflo

[njhub]

Bonsoir,

essayez la formule ci-dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=GAUCHE(SUBSTITUE(SUBSTITUE(A1;GAUCHE(A1;TROUVE(" - ";A1)+2);"");GAUCHE(SUBSTITUE(A1;GAUCHE(A1;TROUVE(" - ";A1)+2);"");TROUVE(" - ";SUBSTITUE(A1;GAUCHE(A1;TROUVE(" - ";A1)+2);""))+2);"");TROUVE(" -";SUBSTITUE(SUBSTITUE(A1;GAUCHE(A1;TROUVE(" - ";A1)+2);"");GAUCHE(SUBSTITUE(A1;GAUCHE(A1;TROUVE(" - ";A1)+2);"");TROUVE(" - ";SUBSTITUE(A1;GAUCHE(A1;TROUVE(" - ";A1)+2);""))+2);""))-1)

[Raccourcix]

Bonjour

en regardant les caractères "espace" avant et après les "tirets" vous noterez que vous avez 2 types d'espace.
les espaces "normaux" en caractères 32 et les espaces insécables en 160
il se trouve que le texte que vous voulez extraire se trouve entre les caractères 160

voici les codes de votre texte en A1avec en rouge ce qui vous intéresse.

122 49 53 68 32 45 32 86 49 32 45 160 49 51 43 51 52 160 45 32 49 52 43 54 53


avec votre version d'excel pour devez pouvoir utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=STXT(A1;TROUVE(CAR(160);A1)+1;TROUVE(CAR(160);A1;TROUVE(CAR(160);A1)+1)-TROUVE(CAR(160);A1)-1)

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=GAUCHE(DROITE(A1;NBCAR(A1)-TROUVE(CAR(160);A1));TROUVE(CAR(160);DROITE(A1;NBCAR(A1)-TROUVE(CAR(160);A1))))

Stéphane

[jurassic pork]

Hello,
on peut aussi utiliser une fonction personnalisée (dans module vba) qui emploie les expressions régulières. Exemple (il y a d'autres motifs possibles) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Public Function ExtraireSousData(Data) As String
Dim RE As Object, allMatches As Object
Set RE = CreateObject("vbscript.regexp")
ExtraireSousData = "ERREUR"
RE.Pattern = ".+-.+-(.*)-.+"
Set allMatches = RE.Execute(Data)
If allMatches.Count = 1 Then
    ExtraireSousData = Trim(allMatches(0).SubMatches(0))
End If
End Function

Ami calmant, J.P