XL 2010 recherche de nombre entre différents caratères

Staple1600

XLDnaute Barbatruc

• 13 Mars 2022

• #2

Bonjour

Malheureusement ne fonctionne qu'à partir d'Excel 2013

Code:

=SUBSTITUE(FILTRE.XML("<t><s>"&SUBSTITUE(A1;"+";"</s><s>")&"</s></t>";"//s[contains(.,'dr')]");"dr";"")

Test OK sur mon Excel 2013

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 13 Mars 2022

• #3

Re

Voila le résultat de mon test

EDITION: j'ai retesté en déplaçant la position du dr
16cr+25+15dr+23pr
25+155dr
48+pr25+1600dr+58+98
Cela fonctionne également
La seule contrainte c'est qu'il ne doit y avoir qu'une seule occurrence de dr dans la cellule.

 

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #4

Staple1600 à dit:

Re

Voila le résultat de mon test
Regarde la pièce jointe 1133548

Cliquez pour agrandir...

merci beaucoup
marche très bien sur mon excel 2019 mais je dois le testé sur celui de mon taf qui est lui de 2010

 

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #5

Bon après mon test ne marche pas sur excel 2010 dommage

 

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 13 Mars 2022

• #6

Bonjour à tous,

Peut être un début de piste

VB:

=STXT(A6;CHERCHE("+";A6;(CHERCHE("DR";A6)-1)-4)+1;CHERCHE("DR";A6)-1-CHERCHE("+";A6;(CHERCHE("DR";A6)-1)-4))

JHA

 

Pièces jointes

• Classeur recherche.xlsx

  9.7 KB · Affichages: 3

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #7

Pour info j'envoie le fichier comme exemple

 

Pièces jointes

• Classeur test.xlsx

  9.1 KB · Affichages: 0

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #8

et merci c'est un bon début sauf qu'il faut que je le fasse sur les autres aussi

 

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #9

Malheureusement pour moi mais Staple avait grave la solution mais comment le faire avec un excel 2010

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 13 Mars 2022

• #10

Bonjour à tous
Une autre formule qui doit fonctionner avec toutes les versions d'Excel.:

VB:

=CNUM(DROITE(SUBSTITUE(GAUCHE(A1;CHERCHE("dr";A1)-1);"+";REPT(" ";250));250))

 

Pièces jointes

• thierry974- extraction nombre- v1.xls

  26 KB · Affichages: 1

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 13 Mars 2022

• #11

thierry974 à dit:

merci beaucoup
marche très bien sur mon excel 2019 mais je dois le testé sur celui de mon taf qui est lui de 2010

Cliquez pour agrandir...

Bonjour à tous
Sinon en fonction perso (toute version)

VB:

Function ChiffreAvantDR(cellule)
    Dim TMP, C
    TMP = Split(cellule, "+")
    For Each C In TMP
        If UCase(Right(C, 2)) = "DR" Then ChiffreAvantDR = Left(C, Len(C) - 2) * 1: Exit Function
    Next
End Function

Et dans une cellule

Code:

=ChiffreAvantDR(A1)

 

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #12

Bonjour à toi et encore merci fonctionne parfaitement

 

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #13

Merci encore à tout le monde vous m
'enlevez une grosse épine du pied la

 

Vote positif 0 Vote négatif

Jacky67

XLDnaute Barbatruc

• 13 Mars 2022

• #14

thierry974 à dit:

Merci encore à tout le monde vous m
'enlevez une grosse épine du pied la

Cliquez pour agrandir...

Certainement que mapomme a tiré très fort (sur l'épine)

 

Vote positif 0 Vote négatif

T

thierry974

XLDnaute Nouveau

• 13 Mars 2022

• #15

c'était un one shot la

 

Vote positif 0 Vote négatif