Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 23/09/2011, 11h34   #1
Membre habitué
 
Avatar de Oh!Tofocus
 
Inscription : août 2007
Messages : 213
Détails du profil
Informations personnelles :
Âge : 47

Informations forums :
Inscription : août 2007
Messages : 213
Points : 116
Points : 116
Par défaut ouverture de csv par enregistreur macro

Bonjour

Avec l'enregistreur de macro j'ai généré un code pour ouvrir un fichier csv

mais quand je lance la macro le fichier ouvert fait apparaitre les " ; " separateurs et pas un tableau normal ( alors que pendant l'enregistrement tout se passe bien )


Code :
Workbooks.Open Filename:="C:\Documents and Settings\leo\Mes documents\TEST.csv"
Que faut-il ajouter au code pour qu'il gère les csv automatiquement ?
Oh!Tofocus est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/09/2011, 11h49   #2
Expert Confirmé Sénior
 
Homme Daniel
aucune
Inscription : septembre 2011
Messages : 2 004
Détails du profil
Informations personnelles :
Nom : Homme Daniel
Localisation : France, Seine et Marne (Île de France)

Informations professionnelles :
Activité : aucune

Informations forums :
Inscription : septembre 2011
Messages : 2 004
Points : 4 037
Points : 4 037
Bonjour,

Citation:
Que faut-il ajouter au code pour qu'il gère les csv automatiquement ?
Normalement, rien. Si le séparateur défini dans les options régionales Windows est bien le point virgule. Est-ce que c'est ton cas ?
Quand tu ouvres le fichier CSV manuellement, est-ce que tout se passe bien ?
__________________
Cordialement.

Daniel

Citation:
La plus perdue de toutes les journées est celle où l'on n'a pas ri.
Chamfort
Daniel.C est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 23/09/2011, 12h00   #3
Membre Expert
 
Avatar de aalex_38
 
Inscription : septembre 2007
Messages : 1 596
Détails du profil
Informations forums :
Inscription : septembre 2007
Messages : 1 596
Points : 1 748
Points : 1 748
Bonjour,


Tu peux essayer :

Code :
Workbooks.Open Filename:="C:\Documents and Settings\leo\Mes documents\TEST.csv" Format:=4
__________________
aalex_38 est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 23/09/2011, 21h13   #4
Membre habitué
 
Avatar de Oh!Tofocus
 
Inscription : août 2007
Messages : 213
Détails du profil
Informations personnelles :
Âge : 47

Informations forums :
Inscription : août 2007
Messages : 213
Points : 116
Points : 116
Merci pour vos 2 reponses rapides.
mais ça ne marche pas.

après quelques recherches,j'ai trouvé une explication
vba utilise les valeurs americaines pour le csv c'est à dire séparation par virgule

pour forcer l'ouverture avec la norme locale ( le point virgule en france )il faut le préciser...
soit:

Code :
Workbooks.Open Filename:="C:\Documents and Settings\leo\Mes documents\TEST.csv", local:=True
et tout rentre dans l'ordre
Oh!Tofocus est déconnecté   Envoyer un message privé Réponse avec citation 10
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 20h26.


 
 
 
 
Partenaires

Hébergement Web