extraction d'une valeur

[Akram abdelhalim]

Bonjour
Dans mon fichier excel j'ai des cellules contient par exemple
F35-GK-39-41-M ; 20770 ; 25/12/2018 9:25:47 AM
Je veux extraire le numéro entre les deux ';' c à d 20770

merci de m'aider

 

[herve62]

Bonjour
Si dans A1 tu as ta chaine en B1 tu peux écrire :
STXT(A1;TROUVE(";";A1;1)+2;5)
Sachant que la longueur cherchée sera toujours de 5 pour ce cas avec espace après ";"

 

[Denis132]

Bonsoir à vous 2,

Si tu n'as pas toujours le même nombre de chiffres entre les ;

Denis
P.S. Il y a sûrement plus court
@+

 

[job75]

Bonjour Akram abdelhalim, herve62, Denis132,

Avec cette fonction VBA, à placer dans un module standard :

Function Extract(t$, sep$, n%)
Extract = Trim(Split(t, sep)(n - 1))
If IsNumeric(Extract) Then Extract = CDbl(Extract)
End Function

A+