Supprimer dans cellule

bonjour a tous

je vous sollicite une fois de plus afin de m'aider en vba sur le cas suivant svp

j'ai dans une cellule ceci "14/ 70 411 130" et je souhaite avoir le resultat suivant "411" c'est a dire garder que cette partie et cela dans toute la colonne

merci

Bonjour

Joins ton fichier et on te fera ça !

Bye !

Bonjour,

En l’absence de précision quant au format des autres données, on supposera qu'il est identique.......

Formule(pour un texte en A3) :

=STXT(A3;8;3)

Code Vba :

Function RetourneTexte(Source As String) As String
    RetourneTexte = Mid(Source, 8, 3)
End Function

Merci de votre support c'est parfait

Bonne journée