formule

Pierrot93

XLDnaute Barbatruc

• 10 Juillet 2013

• #2

Re : formule

Bonjour,

regarde ceci, si cela peut t'aider :

Code:

Dim t As String
t = "C:\Users\carlierLoic\Desktop "
MsgBox Split(t, "\")(2)

bon après midi
@+

 

Vote positif 0 Vote négatif

Dugenou

XLDnaute Barbatruc

• 10 Juillet 2013

• #3

Re : formule

Bonjour lolman, salut Pierrot,
pour avoir le choix : une solution par formule. Si ton texte est en A4 :

Code:

=STXT(A4;CHERCHE("\";A4;CHERCHE("\";A4;1)+1)+1;CHERCHE("\";A4;CHERCHE("\";A4;CHERCHE("\";A4;1)+1)+1)-CHERCHE("\";A4;CHERCHE("\";A4;1)+1)-1)

Cordialement

 

Vote positif 0 Vote négatif

L

lolman14

Guest

• 10 Juillet 2013

• #4

Re : formule

salut Pierrot93 ,
un grand merci sa marche niquel .

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

Supporter XLD

• 10 Juillet 2013

• #5

Re : formule

Bonjour @ tous,
une autre,

Code:

=STXT(A1;TROUVE("*";SUBSTITUE(A1;"\";"*";2))+1;TROUVE("*";SUBSTITUE(A1;"\";"*";3))-TROUVE("*";SUBSTITUE(A1;"\";"*";2))-1)

@ + +

 

Vote positif 0 Vote négatif