Fonction convertir dans un EXCEL

fadrait faire une petite procedure qui lit chaque caractere jusqu'a "/n" et
qui le copie au fur et a mesure dans une cellule.

la prochaine fois, vous pourrez meme rajouter "bonjour" et "svp" et "une
phrase bien construite" dans votre post, plutot qu'une exigence qui n'est
pas sans rappeler un manque de politesse et un culot démesuré.

Bonjour Germaine

Par formule
Avec en A1= Chien

en b1:
=GAUCHE(A1;1)
en c1:
=STXT(A1;2;1)
en d1:
=STXT(A1;3;1)
en e1:
=STXT(A1;4;1)
en f1
=DROITE(A1;1)

en VBA:

For i = 1 To Len([a1])
x = Mid([a1], i, 1)
Cells(1, i + 1) = x
Next

Salutations
JJ


"germaine" <germaine@discussions.microsoft.com> a écrit dans le message de
news:D8EA763A-EEAB-4B62-B617-74B67AC23C54@microsoft.com...

Je voudrais par exemple convertir le mot CHIEN 1 lettre dans 5 cellules
différentes


Merci

Salut

par macro (ici limité à 15 caractères)
Sub Macro1()
Selection.TextToColumns Destination:¬tiveCell, DataType:=xlFixedWidth,
_
FieldInfo:=Array(Array(0, 1), Array(1, 1), Array(2, 1), Array(3, 1),
Array(4, 1), Array _
(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), Array(9, 1),
Array(10, 1), Array(11, 1), Array _
(12, 1), Array(13, 1), Array(14, 1), Array(15, 1))
End Sub

a+
rural thierry
"germaine" <germaine@discussions.microsoft.com> a écrit dans le message de
news: D8EA763A-EEAB-4B62-B617-74B67AC23C54@microsoft.com...

Je voudrais par exemple convertir le mot CHIEN 1 lettre dans 5 cellules
différentes


Merci

Bonjour Germaine,

Si chien était dans la colonne A7, tu pourrais inscrire cette formule en B8 et la tirer jusqu'en E7

=STXT($A$7;COLONNE(A1);COLONNE($A$1))


Salutations!



"germaine" <germaine@discussions.microsoft.com> a écrit dans le message de news:
D8EA763A-EEAB-4B62-B617-74B67AC23C54@microsoft.com...
Je voudrais par exemple convertir le mot CHIEN 1 lettre dans 5 cellules
différentes


Merci