une chaine de caractères

R

ric54

Guest
bonjour,
je me demandais s'il y avait possibilité de séparer cette chaine de caractères dans 5 cellules différentes car j'ai plus de 300 chaines comme celle ci.

THIEBAUT , Justine ,19900527, F , 404

merci pour votre précieuse aide
 

Hervé

XLDnaute Barbatruc
bonjour ric54

La plus simple : menu données/convertir.

La version vba, avec tes données en colonne A :

Sub Bouton1_QuandClic()
Dim c As Range
Dim tablo As Variant

For Each c In Range('a1:a' & Range('a65536').End(xlUp).Row)

tablo = Split(c, ',')

For i = 0 To UBound(tablo)
c.Offset(0, i + 1) = tablo(i)
Next i

Next c

End Sub


La version formule : euh....ah ben ca je sais pas faire, faudra attendre les copains.

salut

Edition : salut Xtophe :)

Message édité par: hervé, à: 12/10/2005 12:02
 

excalibur

XLDnaute Impliqué
bonjour ric54 le forum tu peus le faire par donnees convertir delimite separateur virgule terminer on peut le faire par formule dont je me souviens plu cherche dans les archives du forum a moins qu une monique , andre passe par la que je salut au passage .....salutations
 

andré

XLDnaute Barbatruc
Salut à vous tous, plus pécialement à excalibur,

Par formule c'est pas évident, surtout quand on en veut qu'une seule à étirer vers la droite !
J'ai du d'abord quelque peu 'régulariser' la mise en forme du texte original (virgules précédées ou non d'un espace, ...).

Un petit essai en pièce jointe.

Â+



[file name=deconcatener.zip size=1823]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/deconcatener.zip[/file]
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 329
Messages
2 087 334
Membres
103 519
dernier inscrit
Thomas_grc11