Problème MACRO enregistrement CSV

Question

Bonjour à tous,

J'ai réalisé une MACRO permettant de formatter des données issues d'un fichier texte, et ensuite enregistrer ce fichier texte dans un fichier CSV avec le code suivant :

Sheets(3).Select
 'A_FORMU.User_source.Value est le chemin d'enregistrement (sans nom)
 'A_FORMU.User_output_1.Value est le nom du fichier qui sera enregistré
 
 Link = A_FORMU.User_source.Value & A_FORMU.User_output_1.Value & ".csv"
 ActiveWorkbook.SaveAs Filename:=Link, FileFormat:=xlCSV, CreateBackup:=False

Néanmoins, j'ai un soucis...

Voici l'apperçu de ma feuille avant l'enregistrement :

Voici l'apperçu une fois enregistré :

Comme vous pourrez le constater, ma première colonne, temps, est mise entre guillement, je ne sais pas pourquoi... Si j'enregistre manuellement le fichier, sans la MACRO, alors les guillemets ne sont pas mis...

Quelqu'un pourrait-il m'aider ?

Merci,
Fab.

Answer 1

Bonjour

On ne peut pas voir les images attachées.

Regardez la réponse marquée ici:http://social.msdn.microsoft.com/Forums/en-US/isvvba/thread/6c0c087e-4d9f-4b8e-844c-5803492542bd/

A priori la solution c’est de utiliser VBA pour écrire un fichier avec le format que vous voulez.

Cordialement,

---

Aurel BERA, Microsoft
Microsoft propose ce service gratuitement, dans le but d'aider les utilisateurs et d'élargir les connaissances générales liées aux produits et technologies Microsoft. Ce contenu est fourni "tel quel" et il n'implique aucune responsabilité de la part de Microsoft.

Answer 2

Bonjour

On ne peut pas voir les images attachées.

Regardez la réponse marquée ici:http://social.msdn.microsoft.com/Forums/en-US/isvvba/thread/6c0c087e-4d9f-4b8e-844c-5803492542bd/

A priori la solution c’est de utiliser VBA pour écrire un fichier avec le format que vous voulez.

Cordialement,

---

Aurel BERA, Microsoft
Microsoft propose ce service gratuitement, dans le but d'aider les utilisateurs et d'élargir les connaissances générales liées aux produits et technologies Microsoft. Ce contenu est fourni "tel quel" et il n'implique aucune responsabilité de la part de Microsoft.

Bonjour,

J'utilise déja du VBA pour enregistrer le fichier (Cf. mon premier message). La solution proposée sur le topic ci-dessus est la même que la mienne.

Concernant les images, en fin de compte le code met entre guillement ma première colonne (temps).

Merci d'avance,

Fab.

Answer 3

 Re-Bonjour
La solution dans ma réponse c'est celle qui nous indique ce site:
http://www.cpearson.com/excel/ImpText.aspx
et consiste en créer une procédure pour écrire un fichier texte et ne pas utiliser le SaveAs.
Une autre solution dans le même thread c’est de utiliser Local :=True pour forcer le système de utiliser les paramètres régionaux.

ActiveWorkbook.SaveAs Filename:= _
        "C:\Target folder\File name.csv", _
        FileFormat:=xlCSV, CreateBackup:=False,_
Local:=True

Pour la traduction vous pouvez utiliser http://www.bing.com/translator
Cordialement

---

Aurel BERA, Microsoft
Microsoft propose ce service gratuitement, dans le but d'aider les utilisateurs et d'élargir les connaissances générales liées aux produits et technologies Microsoft. Ce contenu est fourni "tel quel" et il n'implique aucune responsabilité de la part de Microsoft.

Answer 4

Je n'y comprends plus rien, je viens de remettre le "Local:=True", et maintenant ca fonctionne mdr.

Bon, l'important est que maintenant ca marche.

Merci,

Fab.

Answer 5

Bonjour

On a marqué la solution afin que d'autres personnes avec le même problème puissent profiter de cette solution.

En effet Local:=True  force Excel d’utiliser les paramètres régionaux exactement comme il fait quand vous enregistrez le fichier « à main ».

Cordialement,

---

Aurel BERA, Microsoft
Microsoft propose ce service gratuitement, dans le but d'aider les utilisateurs et d'élargir les connaissances générales liées aux produits et technologies Microsoft. Ce contenu est fourni "tel quel" et il n'implique aucune responsabilité de la part de Microsoft.