ouvrir un fichier csv - vba

[philppe27]

Bonsoir,

J'ai un fichier csv à ouvrir. Lorsque j'ouvre ce fichier sous excel il n'y a aucun problème les ";" (points virgules) servent de séparateur et j'ai une bonne répartition dans les cellules.
Par contre lorsque j'ouvre ce fichier à partir de la commande vba:
Workbooks.Open Filename:=chemin1
ou bien :
Workbooks.Open Filename:=chemin1, Format:=4
ou encore :
Workbooks.Open Filename:=chemin1, Format:=6, Delimiter:=";"

ce sont les "," (virgules ) qui sont prises comme séparateurs.

Merci de votre aide,

Cordialement

 

[GeoTrouvePas]

Re : ouvrir un fichier csv - vba

Bonsoir,

Je ne peux pas te donner une solution immédiate mais je me souviens qu'il y a un ou deux ans, j'avais fait une application vba qui importer des fichiers .csv dans un classeur pour retraiter les données.

A l'époque, je m'étais simplement servi de l'enregistreur de macro pour capturer les lignes de codes permettant de reproduire la commande : "Données\Données externes\Importer des données".

Cela marchait très bien.

Essaye d'enregistrer cette macro en choisissant différents séparateurs puis repère les différences entre chaque macro pour trouver l'endroit où il te faut la modifier.

Bonne soirée

 

[systmd]

Re : ouvrir un fichier csv - vba

Bonsoir à tous

en PJ un petit exemple.
Espérant que celà puisse vous aider.

 

[systmd]

Re : ouvrir un fichier csv - vba

Bonjour à tous,

En Pj un exemple avec un UserForm

 

[kiki29]

Re : ouvrir un fichier csv - vba

Salut, voir #3 sur https://www.excel-downloads.com/threads/ouvrir-un-fichier-csv-via-une-macro-une-solution.85859/

....,Local:=True

 

[philppe27]

Re : ouvrir un fichier csv - vba

Effectivement en ajoutant Local:=True à la commande Workbooks.OpenText, le séparateur pris en compte est bien le ";".
Merci à tous pour vos réponses,
Cordialement