une chaine de caractères

X

Xtophe

XLDnaute Nouveau

• 12 Octobre 2005

• #2

tu peux utiliser DONNEES/CONVERTIR
préciser que le séparateur est la ,
et pi voilà, le tour est joué.

 

Vote positif 0 Vote négatif

Hervé

XLDnaute Barbatruc

• 12 Octobre 2005

• #3

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

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

excalibur

XLDnaute Impliqué

• 12 Octobre 2005

• #4

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

 

Vote positif 0 Vote négatif

excalibur

XLDnaute Impliqué

• 12 Octobre 2005

• #5

oups!!! pas rafraichi bonjour herve , Xtophe

 

Vote positif 0 Vote négatif

A

andré

XLDnaute Barbatruc

• 12 Octobre 2005

• #6

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]

 

Vote positif 0 Vote négatif