Mqcro excel couper chaine de caractères

Résolu
Morbonnat Messages postés 18 Date d'inscription   Statut Membre Dernière intervention   -  
Morbonnat Messages postés 18 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai recu un document sous excel ou dans la meme cellule se trouve différentes information séparée par une virgule:
Nom, Prénom, fonction, téléphone....

Je voudrais que chaque champs se retrouve dans une colone différente...

Mais je n'arrive pas a trouvé la fonction adéquate sous VBA

A l'aide !!!
A voir également:

2 réponses

Réponse 1 / 2
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
bonjour

Si j'ai bien compris ton problème essaies cette macro 
Sub virgule()
Dim l As Long
l = 1
Do Until Cells(l, 1) = ""
    Do Until InStr(1, Cells(l, 1), ",") = 0
        Cells(l, 1).Insert
        Cells(l, 1).Value = Left(Cells(l + 1, 1).Value, InStr(1, Cells(l + 1, 1), ",") - 1)
        Cells(l + 1, 1).Value = Right(Cells(l + 1, 1).Value, Len(Cells(l + 1, 1).Value) - InStr(1, Cells(l + 1, 1), ","))
    Loop
    l = l + 1
Loop
End Sub
2
Morbonnat Messages postés 18 Date d'inscription   Statut Membre Dernière intervention   1
 
Merci gbinforme !!!

T'es vraiment un crack

sa fait plusieurs fois que je suis bloqué et tes réponses sur ce forum m'ont très souvent aidé

Encore Merci
0
Réponse 2 / 2
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonsoir,
Juste en passant, pas besoin de vba, vous sélectionnez la cellule et dans la barre des menus sous "Données" clic sur "Convertir" et suivez les instructions...
-1
Morbonnat Messages postés 18 Date d'inscription   Statut Membre Dernière intervention   1
 
Merci pour ton aide. Cepdant je voudrais faire une macro car cette tache se répéte toutes les semaines.

Un document m'arrive avec plein de lignes et dans lesquelles une seule cellule est rempli genre:
a, b, c, d
e, f, g, h
.....

et je voudrais pouvoir avoir:

a
b
c
d
e
f
...

Merci a tout ceux qui coudront bien se pencher sur mon probleme !!!
0