Extraire un mot d'un texte

Bonjour à tous,

Je désire extraire un nom d'un texte que je récupère
Le tete récupéré est toujours du type

numéro
saut de ligne
nom

Exemple :
31

DUPONT

Je voudrais en extraire uniquement le nom, donc ici DUPONT

Comment faire ?
Merci

bonjour,

pour un texte en A3 avec excel 2007

=STXT(A3;TROUVE(CAR(10);A3)+1;NBCAR(A3))

Merci H2so4,

ça marche à merveille, mais, désolé, j'aurais aimé avoir une solution en VBA et non par le biais d'une formule, est ce possible ?

Cordialement

Bonjour,

Un exemple vba. Sélectionner les cellules contenant les données à extraire, lancer la macro, les données extraites seront mises dans la colonne à droite de la colonne sélectionnée.

Sub separenom()
    For Each c In Selection
        c.Offset(0, 1).Value = Mid(c.Value, InStr(c.Value, Chr(10))) 'enlever .offset(0,1) pour replacer le texte initial par l'extrait dans les cellules sélectionnées.
    Next c
End Sub

Un grand merci H2so4,

En adaptant ta proposition à mes besoins j'obtiens entière satisfaction
Bonne journée