Sauvegarde problème de quote dédoublé

[Benoit.Be]

Bonjour j'ai un fichier xml qui contient une série d'information que je dois sauvé dans un fichier "csv" avec comme séparateur le ;


J'ai effectuer une macro qui selectionné les données utiles et les copie dans un nouveau classeur ensuite je sauve celui-ci sous un format csv.

j'ai certaine ligne qui comprennent des "

Test="Hello World"

quand j'ouvre le fichier générer j'obtiens

Test=""Hello World""

😡

Comment puis-je éviter le doublement des "?


Merci

 

[Benoit.Be]

Re : Sauvegarde problème de quote dédoublé

Personne n'a d'idée a me proposer? 🙁

 

[MJ13]

Re : Sauvegarde problème de quote dédoublé

Bonjour,

je crois que tu as oublié le fichier!

 

[Benoit.Be]

Re : Sauvegarde problème de quote dédoublé

Voici le fichier

Dedans il y a une macro

ExportMyData
qui sélectionne les colonnes utiles et qui les recopies dans un nouveau Workbook les données et le sauve sous c:\temp\test.csv

Dans celui-ci on a le résultat :

Qui est la?;"""C'est moi"""

Or moi je souhaite optenir

Qui est la?;"C'est moi"

 

[pierrejean]

Re : Sauvegarde problème de quote dédoublé

bonjour Benoit.Be

a tester;

FileFormat:=xlUnicodeText

 

[Benoit.Be]

Re : Sauvegarde problème de quote dédoublé

Ce n'est le format que je cherche.
il met des tabulation comme séparateur, de plus les quotes sont tjs doublé 🙄

Je dois peut-être parcourir le contenu de chaque cellule et faire l'écriture dans un fichier manuellement?

Si oui comment puis-je connaitre la derniere ligne (utilisé) de ma feuille?

 

[MJ13]

Re : Sauvegarde problème de quote dédoublé

Bonjour Benoit et Pierrejean.

Ne pourrais tu pas sauvegarder ton fichier en .txt?
Ensuite tu peux plus facilement gérer les types délimités.

 

[Benoit.Be]

Re : Sauvegarde problème de quote dédoublé

Je suis ouvert à toutes propositions.

ActiveWorkbook.SaveAs Filename:="c:\Temp\Test.txt", FileFormat:=xlTextWindows, CreateBackup:=False

Excel met des tabulations comme séparateur

Il y a-t-il un moyen de dire qu'il faut des ; comme séparateur?
et de laisser ses foutus " tranquille 🙄

en xlTextPrinter il ne modifie pas le nombre de " mais par contre c'est la tabulation qui est aussi le séparateur de champ 🙁

 

[MJ13]

Re : Sauvegarde problème de quote dédoublé

Re bonjour

Pour cela enregistre une macro en ouvrant ton fichier texte avec le bon délimiteur. Le code va se générer automatiquement. Puis tu n'auras plus qu'a adapter la macro en modifiant le nom de fichier si besoin.

 

[Benoit.Be]

Re : Sauvegarde problème de quote dédoublé

Pour l'ouverture du fichier

Workbooks.OpenText Filename:="C:\Temp\Test.txt", Origin:=xlWindows, _
 StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlNone, _
 ConsecutiveDelimiter:=False, Tab:=False, Semicolon:=True, Comma:=False _
,Space:=False, Other:=False,FieldInfo:=Array(Array(1, 1),Array(2, 1),Array(3, 1))

Donc il faut que je sauvegarde avec les options

DataType:=xlDelimited, [COLOR="Red"]TextQualifier:=xlNone[/COLOR], _
 ConsecutiveDelimiter:=False, Tab:=False, [COLOR="Red"]Semicolon:=True[/COLOR], Comma:=False _
,Space:=False, Other:=False

 

[Benoit.Be]

Re : Sauvegarde problème de quote dédoublé

Bon finalement j'ai fait la sauvegarde moi-même

Grace a UsedRange


Merci à tous les deux pour votre aide