Discussion :

[hichemnho]

Bonjour,

Ce que j'esseye de faire et que même aprés avoir tout esseyer je ne parviens pas à faire est d'eclater une cellule en plusieurs colonnes.
Par exemple, passer d'une cellule Excel contenant 2,47,15,1.9691e+05,-0.595,0.272 et arriver à avoir la valeur "2" dans une colonne ou cellule sépremment, la valeur "47" dans une colonne ainsi de suite (15 dans une cellule , 1.9691e+05 dans une cellule)
J'ai tout esseyé et ne parvient pas à le faire.

Je vous remercie infinimement d'accorder de votre temps à ce message.

[edelweisseric]

Bonjour à tous
Bonjour hichemnho

Une petite recherche sur un excellent site : http://silkyroad.developpez.com/VBA/...nesCaracteres/

Un exemple à adapter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub extractionMots()
    Dim Tableau() As String
    Dim i As Integer
 
    'découpe la chaine (dans la cellule A1) en fonction des "," 
    'le résultat de la fonction Split est stocké dans un tableau
    Tableau = Split(Range("A1"), ",")
    For i = 0 To UBound(Tableau)
        Cells(1, 2 + i) = Tableau(i)
    Next i
End Sub

Tu dis
Eric

[hichemnho]

Bonjour edelweisseric,

D'abord merci d'avoir pris la peine de lire mon message et de prendre de ton temps pour me répondre.
Le soucis c'est que je suis débutant dans Excel et que je ne sais pas ou écrire ce que tu m'as fournis.
Je te serai reconnaissant de m'indiquer ou inserer le code que tu' m'as fournis.

Encore merci pour ton aide.

[hichemnho]

j'ai cherché et finalement trouvé comment appliquer ce que vous m'avez fourni mais j'ai esseyé d'appliqué le resultat sur toutes les lignes c'est à dire pas uniquement A1 mais aussi A2,A3 etc...mais je n'ai pas pu.
Est-ce que vous pouvez m'aidez sur ce point

Je vous remercie d'avance.

[mercatog]

Il suffit de faire Données>Convertir et de choisir la virgule comme séparateur.

En fait, quelle est ta version d'Excel?

[hichemnho]

ça fonctionne.Merci à vous d'avoir prise de votre temps pour m'aider mercatog.
Merci également à edelweisseric pour votre aide.