Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Extraction du titre, du nom et du prénom à partir d'une cellule

Extraction du titre, du nom et du prénom à partir d'une cellule

6 réponses
Avatar
Choko
Bonjour à tous,

J'ai un petit souci, et malgré toutes les astuces trouvées sur le forum et
sur google, je n'arrive pas à trouver mon bonheur:

J'ai une cellule (A1) contenant le nom d'un de mes contacts: Ex: Mr Jean
Laval

Je cherche à extraire: - en B1 : son titre : Mr
- en B3 : son prénom: Jean
- en B3 : son nom: Laval

Le problème étant que ce contact change régulièrement, j'aurai besoin d'une
formule qui s'adapte automatiquement. Celà est il possible ?

D'avance merci

Choko
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Pierre Jagut
Bonjour,

Je te propose la fonction suivante. Elle extrait le Nième mot d'une chaîne
de caractère, les mots étant séparés par un caratère spécifique.
En B1 : =Scan(A1,1," ")
En B2 : =Scan(A1,2," ")
En B3 : =Scan(A1,3," ")
Elle ne fonctionne que si la grammaire est strictement Civilité blanc Prénom
blanc Nom. Si le prénom est double sans tiret (ex : Jean Pierre), cela
introduit un décalage : il faut donc la paufiner.

Public Function Scan(Chaine As String, position As Integer, separateur As
String) As String

Dim l As Integer, i As Integer, j As Integer
Dim s As Integer

If IsNull(Chaine) Then
Scan = ""
Exit Function
End If

s = 1
l = Len(Chaine)
If l = 0 Then
Scan = ""
Exit Function
End If
If (IsNull(separateur) Or Len(separateur) = 0) Then
separateur = " "
End If
i = 1
Do While (i <= l) And (s <= position)
j = InStr(i, Chaine, separateur, vbTextCompare)
If (IsNull(j) Or j = 0) Then
If s = position Then
Scan = Mid(Chaine, i, l - i + 1)
Else
Scan = ""
End If
Exit Function
Else
If s = position Then
Scan = Mid(Chaine, i, j - i)
Exit Function
Else
s = s + 1
i = j + 1
End If
End If

Loop


End Function


"Choko" a écrit dans le message de
news:
Bonjour à tous,

J'ai un petit souci, et malgré toutes les astuces trouvées sur le forum et
sur google, je n'arrive pas à trouver mon bonheur:

J'ai une cellule (A1) contenant le nom d'un de mes contacts: Ex: Mr Jean
Laval

Je cherche à extraire: - en B1 : son titre : Mr
- en B3 : son prénom: Jean
- en B3 : son nom: Laval

Le problème étant que ce contact change régulièrement, j'aurai besoin
d'une

formule qui s'adapte automatiquement. Celà est il possible ?

D'avance merci

Choko




Avatar
Dédé
Salut Choko !

Ben pour cela, essaie ce qui suit mais cela ne gère pas les noms composé
comme Jean pascal

[A1] = Nom complet
[B1] = Titre
[C1] = Nom
[D1] = Prénom

[A2] = Mr. Jean Laval
[B2] = =GAUCHE(A2;TROUVE(" ";A2)-1)
[C2] = =DROITE(STXT(A2;TROUVE(" ";A2)+1;NBCAR(A2));TROUVE("
";STXT(A2;TROUVE(" ";A2)+1;NBCAR(A2))))
[D2] = =GAUCHE(STXT(A2;TROUVE(" ";A2)+1;NBCAR(A2));TROUVE("
";STXT(A2;TROUVE(" ";A2)+1;NBCAR(A2)))-1)

Est-ce que cela te convient ?

Salutations
Dédé

--
Pour répondre, enlever le NOSPAM
"Choko" a écrit dans le message de
news:
Bonjour à tous,

J'ai un petit souci, et malgré toutes les astuces trouvées sur le forum et
sur google, je n'arrive pas à trouver mon bonheur:

J'ai une cellule (A1) contenant le nom d'un de mes contacts: Ex: Mr Jean
Laval

Je cherche à extraire: - en B1 : son titre : Mr
- en B3 : son prénom: Jean
- en B3 : son nom: Laval

Le problème étant que ce contact change régulièrement, j'aurai besoin
d'une

formule qui s'adapte automatiquement. Celà est il possible ?

D'avance merci

Choko




Avatar
Marie
Bonjour,
Sans utiliser de formule, essaye d'utiliser le menu Données, Convertir
(après avoir sélectionné le nom), le plus simple

Sinon pour le titre :
=GAUCHE(A1;TROUVE(" ";A1)-1)

Pour le nom :
=DROITE(A1;TROUVE(" ";A1)+1)

Pour le prénom j'ai un exemple de formule mais elle est si compliquée que je
n'y comprends rien...

J'espère avoir bien répondu, bon courage
Marie



"Choko" a écrit dans le message news:

Bonjour à tous,

J'ai un petit souci, et malgré toutes les astuces trouvées sur le forum et
sur google, je n'arrive pas à trouver mon bonheur:

J'ai une cellule (A1) contenant le nom d'un de mes contacts: Ex: Mr Jean
Laval

Je cherche à extraire: - en B1 : son titre : Mr
- en B3 : son prénom: Jean
- en B3 : son nom: Laval

Le problème étant que ce contact change régulièrement, j'aurai besoin
d'une

formule qui s'adapte automatiquement. Celà est il possible ?

D'avance merci

Choko




Avatar
Choko
Merci à tous pour votre aide précieuse.

Certaines formules marchent, mais pas à tous les coups malheureusement. Si
je change le nom, cela ne fonctionne plus !! Il doit y avoir un moyen
d'avoir une formule qui s'adapte sans passer par une macro.
En plus j'ai certains contacts qui se mettent dans cette cellule certains
jours, et qui n'ont pas de prénom, donc cela fausse tout.

Merci encore

"Choko" a écrit dans le message de news:

Bonjour à tous,

J'ai un petit souci, et malgré toutes les astuces trouvées sur le forum et
sur google, je n'arrive pas à trouver mon bonheur:

J'ai une cellule (A1) contenant le nom d'un de mes contacts: Ex: Mr Jean
Laval

Je cherche à extraire: - en B1 : son titre : Mr
- en B2 : son prénom: Jean
- en B3 : son nom: Laval

Le problème étant que ce contact change régulièrement, j'aurai besoin
d'une

formule qui s'adapte automatiquement. Celà est il possible ?

D'avance merci

Choko




Avatar
Daniel.M
Bonsoir Choko,

En plus j'ai certains contacts qui se mettent dans cette cellule certains
jours, et qui n'ont pas de prénom, donc cela fausse tout.



Quels sont les cas qui causent problème? Donne un exemple précis. Y a-t-il de
Jean Pascal ..., comme Dédé te l'a demandé?

Ça fait partie de ta responsabilité d'identifier l'ensemble des cas types (ils
ne doivent guère être nombreux) et de leur résultat attendu.

Salutations,

Daniel M.

Avatar
Pierre Jagut
Bonjour,

Si la règle n'est pas toujours Civilité Prénom Nom, il faudrait que tu
identifies tous les cas possibles pour essayer de définir une "grammaire".
Notamment :
- y a-t-il toujours une civilité au début, cette civilité est-elle toujours
d'un seul mot ou bien peut-elle être "M. et Mme" (par exemple)
- le nom est-il toujours en dernier, est-il toujours composé d'un seul mot
(ou bien peut-il y avoir des "de la ..." par exemple)
- les prénoms doubles sont-ils bien séparés par tiret
- quels sont les moyens pour repérer les anomalies
- et surtout, quel est le caractère "critique" de cette séparation (repérer
le nom est-il important) ?

Si tu ne fais qu'une seule fois cette opération, il suffit peut-être
simplement de repérer les lignes qui posent problème pour les traiter
manuellement.

Si tu dois refaire régulièrement cette opération, pose-toi deux questions :
- n'est-il pas possible d'améliorer l'information à la source, soit en
créant 3 champs de saisie différents, soit en formant les opérateurs
- ce traitement doit-il être entièrement automatisé, ou bien une étape
manuelle de modification des anomalies repérées est-elle possible ?

Pierre.


"Choko" a écrit dans le message de
news:
Merci à tous pour votre aide précieuse.

Certaines formules marchent, mais pas à tous les coups malheureusement. Si
je change le nom, cela ne fonctionne plus !! Il doit y avoir un moyen
d'avoir une formule qui s'adapte sans passer par une macro.
En plus j'ai certains contacts qui se mettent dans cette cellule certains
jours, et qui n'ont pas de prénom, donc cela fausse tout.

Merci encore

"Choko" a écrit dans le message de news:

Bonjour à tous,

J'ai un petit souci, et malgré toutes les astuces trouvées sur le forum
et


sur google, je n'arrive pas à trouver mon bonheur:

J'ai une cellule (A1) contenant le nom d'un de mes contacts: Ex: Mr Jean
Laval

Je cherche à extraire: - en B1 : son titre : Mr
- en B2 : son prénom: Jean
- en B3 : son nom: Laval

Le problème étant que ce contact change régulièrement, j'aurai besoin
d'une

formule qui s'adapte automatiquement. Celà est il possible ?

D'avance merci

Choko