Exemple :
A1 contient : DURAND Patrick
Pour extraire uniquement le NOM (ou le premier mot de la cellule) placez en B1 la formule suivante :
=GAUCHE(A1;CHERCHE(" ";A1)-1)
Résultat :
Pour extraire le PRENOM (ou le premier mot après le premier espace) placez en C1 la formule suivante :
=DROITE(A1;NBCAR(A1)-NBCAR(B1)-1)
Résultat :
Résultat final sur les cellules B et C
Dans cet exemple l'extraction en case B1 est basée sur le premier "espace" dans la chaîne de caractères. L'extraction peut être basée sur toute type de caractères... Il suffit de changer le caractère souhaité dans la formule.
Voici deux exemples supplémentaires :
Résultat :
Si vous êtes adeptes du Visual Basic voici la macro pour l'extraction du NOM et prénom.
Sélectionnez la cellule où se trouve les données et lancez la macro. Les extractions seront juxtaposées à la cellule sélectionnée.
Sub ExtraireNomPrenom()
Dim WS As Worksheet
Dim NomComplet As String
Dim Nom As String
Dim Prenom As String
Dim NomPrenom() As String
Set WS = ActiveSheet
' Lire le nom complet de la cellule active
NomComplet = ActiveCell.Value
' Diviser le nom complet en nom et prénom
NomPrenom = Split(NomComplet, " ")
' Le nom est le premier élément du tableau
Nom = NomPrenom(0)
' Le prénom est le reste du tableau
Prenom = Mid(NomComplet, Len(Nom) + 2)
' Écrire le nom et le prénom dans les cellules juxtaposées à la cellule active
ActiveCell.Offset(0, 1).Value = Nom
ActiveCell.Offset(0, 2).Value = Prenom
End Sub
Bonne application.
Aucun commentaire :
Enregistrer un commentaire
Pour vous aider à publier votre commentaire, voici la marche à suivre :
1) Ecrivez votre texte dans le formulaire de saisie ci-dessus
2) Si vous avez un compte, vous pouvez vous identifier dans la liste déroulante Commentaire
Sinon, vous pouvez saisir votre nom ou pseudo par Nom/URL
3) Vous pouvez, en cliquant sur le lien S'abonner par e-mail, être assuré d'être avisé en cas d'une réponse
4) Cliquer sur Publier enfin.
Le message sera publié après modération.
Merci