mise en forme cellule

[Laurence]

Comment séparer le contenu d'une cellule en deux cellules ? (ex. : séparer les prénoms des noms.
Merci de votre réponse

 

[justine]

bonsoir laurence, le forum
il y a un article tres bien fait, c'est la charte de ce forum.
apres il faut savoir si tu veux que l'on te resolve ton petit probleme soit en formule soit en code.
justine

 

[porcinet82]

Salut Laurence, Justine,

Au cas ou Laurence n'aurait pas trouver la Chartre

Comme je suis dans un bon jour, je te propose une macro (meme si ce sujet a traité des dizaines de fois au minimum).

En admettant que tes données soient en colonne A, le resultat est proposé en colonne B. A noté qu'elle ne fonctionne pas pour des prenoms composés avec espace du genre Jean Edouard Dupond.

Sub test()
Dim i As Byte

Application.Goto Sheets('feuil1').Range('A1')
For i = 1 To Range('a65536').End(xlUp).Row
    Cells(i, 2).Value = Right(Cells(i, 1).Value, (Len(Cells(i, 1).Value) - InStr(1, Cells(i, 1).Value, ' ')))
Next i
End Sub

@+

 

[Laurence]

Merci beaucoup 🙂