Ouvrir fichier csv [Résolu/Fermé]

Signaler
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
-
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
-
Bonjour tout le monde,

Je souhaite ouvrir un Fichier .csv en VBA, avec comme séparateur la tabulation. Du coup j'utilise ce code là

Workbooks.OpenText Filename:=Chemin & FichierVapeurEvapo, _
Comma:=False, Space:=False, Tab:=True, Semicolon:=False


Mais cela me prend comme séparateur la virgule or pourtant je l'ai mis à False. Du coup j'ai été dans les paramètre Windows, pour savoir quel est le séparateur par défaut et c'est bien le point virgule.

Pouvez vous m'aidez s'il vous plait car je ne vois pas d'où vient le problème

je vous remercie

Cordialement,

4 réponses

Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322
Bonjour,

Normalement le separateur tab est plutot pour les fichiers TXT pas CSV.

Mais il y a moyen de palier a cette bizarerie:

macro faite avec l'enregistreur de macro, ouveture du fichier et conversion des donnees avec tab en separateur

Sub Macro1()
'
' Macro1 Macro
'

'
    Workbooks.Open Filename:="D:\_ACSV1\Classeur1.csv"
    Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
        Array(7, 1)), TrailingMinusNumbers:=True
    Windows("Classeur1").Activate
End Sub
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
9
Bonjours f894009,

Dans un premier temps merci pour ta réponse et le temps que tu y a consacré

L'enregistrement d'une macro pour la conversion des données c'est ce que j'ai fais mais quand je l'exécute à partîr du fichier .csv que je souhaite convertir cela marche parfaitement mais moi je veux ouvrir le fichier puis le convertir tout ça à partîr d'un autre fichier cette fois-ci qui est en .xls mais là il me prend pas en compte la fabulation en séparateur

Cordialement
Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322 >
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016

Bonjour,
Le code que j'ai mis à disposition je l'ai testé à partir d'un classeur excel pas du fichier CSV!!!!!!!!!!

Vous avez aussi la possibilite de creer une macro en partant de donnees externes, fichier texte
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
9
Bonjour,

J'ai tester votre code mais rien n'y fais quand je l'ouvre se toujours les virgule que j'ai comme séparateur et non la tabulation malheureuse

Je te remercie quand même

Bonjour

D'après la doc, pour que le type de séparateur (Tab, Semicolumn…) soit pris en compte, DataType doit être définie sur xlDelimited :
https://docs.microsoft.com/fr-fr/office/vba/api/excel.workbooks.opentext?redirectedfrom=MSDN
Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322
Bonjour,

Meme avec ce parametre, j'ai essaye et marche pas toujours
Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322
Re,

Deudeu79
Serait-t-il possible d'avoir un fichier csv si sans donnes sensibles
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
9
Je vous envoie sa dès que possible
Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322 >
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016

Re,
Merci
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
9
Voici le fichier que je tente d'ouvrir

https://www.cjoint.com/c/FCktogMF2eY
Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322 >
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016

Bonjour,
Je recupere le fichier

A+
Messages postés
15266
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
6 août 2020
1 322
Re,

fichier avec choix du CSV: https://www.cjoint.com/c/FClidQ1tAif
Messages postés
58
Date d'inscription
mercredi 29 avril 2015
Statut
Membre
Dernière intervention
11 juillet 2016
9
Merci beaucoup F894009 cela fonctionne parfaitement