probleme avec un csv

[sonskriverez]

Bonsoir,

Désolé de reposter mais je n'en m'en sort pas, je vous joint un petit exemple de mon problème:

j'ouvre par macro un difier csv dans lequel il y 2 colonnes. La 1ere pas de probleme tout est séparé par ';'. La seconde contient le prénom de la personne.
Je voudrais par macro avoir chaque donné dans une colonne différente sauf la dernère colonne sous la forme nom, prénom

Merci de votre aide [file name=CSV.zip size=4450]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CSV.zip[/file]

 

[bebere]

bonsoir Sonskriverez
à mettre dans le code de la feuille

Sub Separe()
Dim Plg, L As Integer

Plg = Range('A2:B' & Range('A65536').End(xlUp).Row)
For L = 1 To UBound(Plg, 1)
Range('C' & L + 1 & ':R' & L + 1).Value = Split(Plg(L, 1), ';')
Range('R' & L + 1).Value = Range('R' & L + 1).Value & Plg(L, 2)
Next L

Columns('C:E').Delete
Columns('D:E').Delete
Columns('C:M').AutoFit

End Sub

à bientôt

 

[sonskriverez]

Merci bebere de te pemcher sur mon probleme.

Ton code fonctionne tant que le format reste cohérent par contre il y a une ou des lignes qui ont la rupture avant le prenom !!

En plus le fichier csv peut malheureusement avoir une structure différente. Le problème vient que dans la base de données d'origine il y a des champs avec un séparateur ',' dans le champ ex :
DUPONT, MAURICE.

Merci de ton aide [file name=CSV1.zip size=7452]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CSV1.zip[/file]

 

[bebere]

bonjour Sonskriverez,le Forum
une amélioration
je regarde tantôt pour concaténer nom,prénom
j'ai mis le résultat en feuil2
à bientôt [file name=CSV1_20060103143857.zip size=8417]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CSV1_20060103143857.zip[/file]

 

[Sonskriverez]

Eh bien, du bon boulot, cela se complique.

C'est quand même etrange que le csv tronque les champs dans lequel il y a une ','.
Je n'ai pas de pbl si je fait mon extraction en *.txt

 

[bebere]

bonsoir

essaye la procédure AetB
elle concatène les 2 colonnes et puis la séparation dans diverses colonnes

à bientôt

 

[bebere]

le fichier n'est pas passé [file name=CSV1_20060103211524.zip size=11361]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CSV1_20060103211524.zip[/file]