Enregistrement fichier - Format csv - VBA

Bonjour,

Je travail sur Excel 2013 depuis peu.

J'essaye d'écrire une commande pour l'enregistrement d'un fichier au format csv avec séparateur ";" en VBA.

Mais j'ai un souci, lors de l'enregistrement, j'ai des virgules et non des points virgules. Je ne veux faire aucunes manipulations dans les options Excel (le fichier va être utilisé par X personnes sur des postes différents).

Avec Excel 2010, il valait rajouter "Local :=True", ce que j'ai fait dans ma macro, mais cela ne fonctionne pas.......

Un peu d'aide serait sympa !!!

Voici ma macro

    ActiveWorkbook.SaveAs Filename:= _
        "C:\xxxxxxxxx\TF_OD.csv", FileFormat:=xlCSV, CreateBackup:=False, local:=True
    ActiveWorkbook.Save
    ActiveWindow.Close

Merci d'avance

bonjour

voivi un morceau de code qui fonctionne chez moi....

je dois extraire la feuille qui va bien (ici Codename feuil4) du fichier excel pour l'enregistré au format csv :

fich_dest = ActiveWorkbook.Path & "\Toto.csv"
Feuil4.Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=fich_dest, FileFormat:=xlCSV, CreateBackup:=False, Local:=True
ActiveWorkbook.Close False
Application.DisplayAlerts = True

A+

Fred

Bonjour,

quel est ton séparateur de liste dans le panneau de config / Region ?

eric

fred2406 a écrit :

bonjour

voivi un morceau de code qui fonctionne chez moi....

je dois extraire la feuille qui va bien (ici Codename feuil4) du fichier excel pour l'enregistré au format csv :

fich_dest = ActiveWorkbook.Path & "\Toto.csv"
Feuil4.Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=fich_dest, FileFormat:=xlCSV, CreateBackup:=False, Local:=True
ActiveWorkbook.Close False
Application.DisplayAlerts = True

A+

Fred

Bonjour Fred,

Merci cela fonctionne à merveille

Très bonne journée

Coco

Bonjour

Dans ce cas

merci

Fred