Sauvegarde d'une Feuille Excel2010 sous format CSV avec séparateur ; & extension .txt

[Hornet06]

Bonjour
@ l'intérieur d'une macro XL, je sauvegarde une partie de mon fichier XL
Je sauvegarde donc une des feuilles au format .CSV avec séparateur ; et extension du fichier en .txt

Surprise , lorsque j'ouvre ce fichier xxx.txt, le séparateur est la virgule

Hors lorsque je fait cette manipualtion en interactif, le séparateur est bien le ;


d = "save du " & E & " au " & f & ".txt"

Sheets("DOM").Select
ActiveWorkbook.SaveAs Filename:=d, _
FileFormat:=xlCSV, CreateBackup:=False


Avez vous une solution ?
Merci