Fichier au fomat CVS avec Excel 2003

[Compte Supprimé 979]

Bonjour à tous,

Pour aider mes collègues dans leur manipulation,
j'ai créé une petite macro qui permet d'enregistrer une feuille d'un classeur au format CSV !

Malheureusement le format CSV qui en ressort n'est pas celui que je souhaite !?

Dans les fichiers joints,
le 1er (BAD) est créé à l'aide de mon code :

VPath = "C:\"
NomCSV = NumCht & " " & LibCht & ".csv"
  ActiveWorkbook.SaveAs Filename:=VPath & NomCSV, FileFormat:=xlCSV, CreateBackup:=False

Le 2ème créé manuellement : Menu -> Fichier -> Enregistrer sous
Type de fichier CSV

Est-que quelqu'un sait d'ou peut provenir le problème et comment le résoudre.

D'avance merci

 

[tototiti2008]

Re : Fichier au fomat CVS avec Excel 2003

Bonjour BrunoM45,

je ne peux toujours pas ouvrir les Zip, mais comme j'ai une petite idée, peut-être en essayant :

ActiveWorkbook.SaveAs Filename:=VPath & NomCSV, FileFormat:=xlCSV, CreateBackup:=False, Local:=True

 

[JORDAN]

Re : Fichier au fomat CVS avec Excel 2003

Bonjour Bruno, Tototiti, le Forum,

Je viens de tester ton fichier et chez moi ça fonctionne tres bien
les données se retrouvent bien dans les différentes colonnes
Je vais refaire un autre test pour voir c ça marche encore
a+

 

[roidurif]

Re : Fichier au fomat CVS avec Excel 2003

Bonjour,

Je ne vois pas le fichier .xls avec la macro.

Cdt

 

[JORDAN]

Re : Fichier au fomat CVS avec Excel 2003

re,
Je viens de retester et ça a fait comme toi
par contre en rajoutant Local:=True comme l'a dit Tototiti, c bon ça marche

 

[Compte Supprimé 979]

Re : Fichier au fomat CVS avec Excel 2003

Salut Tototiti2008 😉

Bonjour BrunoM45,

je ne peux toujours pas ouvrir les Zip, mais comme j'ai une petite idée, peut-être en essayant :

ActiveWorkbook.SaveAs Filename:=VPath & NomCSV, FileFormat:=xlCSV, CreateBackup:=False, Local:=True

Malheureusement, cela ne fonctionne toujours pas 😕

Ce que je veux obtenir c'est le fichier de ce lien :
Ce lien n'existe plus
Et NON PAS celui là :
Ce lien n'existe plus

Apparemment en code VBA, il n'y a pas moyen 😕
Etrange, voir même bizard 😎

A+

 

[Compte Supprimé 979]

Re : Fichier au fomat CVS avec Excel 2003

Salut JORDAN,

re,
Je viens de retester et ça a fait comme toi
par contre en rajoutant Local:=True comme l'a dit Tototiti, c bon ça marche

Pas chez moi, c'est étrange 😕

Y aurait-il un problème de configuration Office !?

A+

 

[Pierrot93]

Re : Fichier au fomat CVS avec Excel 2003

Bonjour à tous

une autre piste, voir au niveau des options régionales dans le panneau de configuration, si le séparateur de listes est bien un ";".

bon après midi.
@+

 

[Compte Supprimé 979]

Re : Fichier au fomat CVS avec Excel 2003

Salut Pierrot93 😉

Bonjour à tous
une autre piste, voir au niveau des options régionales dans le panneau de configuration, si le séparateur de listes est bien un ";".

bon après midi.
@+

Pas mal vue, mais ce n'est pas ça 🙁
Mon séparateur de liste est bien un ";"

Je vais pleurer, et surtout mes collègues 😛

 

[JORDAN]

Re : Fichier au fomat CVS avec Excel 2003

re,
j'ai pris un fichier au pif et j'ai refais un test, ça marche !!!
le voilà ci-joint
En espérant que cela fonctionne

 

[tototiti2008]

Re : Fichier au fomat CVS avec Excel 2003

Bonjour à tous,

une dernière idée : dans Excel 2003, les séparateurs peuvent être différents de ceux du système.
Va voir dans le Menu Outils-Options, onglet International.
si la case "utiliser les séparateurs système" n'est pas cochée...
ou bien peut-être s'il y a conflit entre 2 séparateurs...
quel est ton séparateur décimal ?
quel est ton séparateur de milliers ?
Ce ne sont que des pistes de réflexion...

 

[Pierrot93]

Re : Fichier au fomat CVS avec Excel 2003

Re

peut être une autre approche comme ceci :

Application.UseSystemSeparators = True
ActiveWorkbook.SaveAs Filename:=VPath & NomCSV, FileFormat:=xlCSV, Local:=True

en espérant...

@+

 

[JORDAN]

Re : Fichier au fomat CVS avec Excel 2003

re,
Je viens de vérifier ma config d'après les infos de Tototiti
La case "utiliser les séparateurs système" est cochée
séparateur décimale j'ai "point"
et je n'ai pas de séparateur de milliers

Si cela peut t'aider
a+

 

[tototiti2008]

Re : Fichier au fomat CVS avec Excel 2003

Re,

Merci Jordan mais c'est chez Bruno que ça ne fonctionne pas, donc j'aurais préféré des infos de sa part...

 

[JORDAN]

Re : Fichier au fomat CVS avec Excel 2003

re,
oui je sais bien, c'était juste pour lui donner des infos avec lesquelles ça fonctionne

Bonne soirée