Bonjour à tous,
Je vous sollicite pour résoudre un problème de format csv.
Pour la comptabilisation de longues écritures, j'utilise un fichier Excel que je transforme en fichier csv. Le fichier csv est alors exporté dans le logiciel comptable.
Le souci est le suivant :
si j'utilise la macro suivante :
Sub savecsv()
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:= _
"c:\fichiercsv.csv", FileFormat:=xlCSV, _
CreateBackup:=False
End Sub
Le fichier est alors sauvé dans le bon format mais je dois le fermer "manuellement". Quand je l'ouvre, le fichier est bien lisible et s'exporte sans difficulté.
Par contre, si je prolonge la macro pour fermer ce fichier:
Sub savecsvbis()
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:= _
"c:\fichiercsvbis.csv", FileFormat:=xlCSV, _
CreateBackup:=False
ActiveWindow.Close
End Sub
le fichier n'est plus aussi "lisible" et je ne peux plus l'exporter dans mon logiciel, les chiffres avec 2 décimales ayant été transformés.
Merci d'avance pour votre aide
Je vous sollicite pour résoudre un problème de format csv.
Pour la comptabilisation de longues écritures, j'utilise un fichier Excel que je transforme en fichier csv. Le fichier csv est alors exporté dans le logiciel comptable.
Le souci est le suivant :
si j'utilise la macro suivante :
Sub savecsv()
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:= _
"c:\fichiercsv.csv", FileFormat:=xlCSV, _
CreateBackup:=False
End Sub
Le fichier est alors sauvé dans le bon format mais je dois le fermer "manuellement". Quand je l'ouvre, le fichier est bien lisible et s'exporte sans difficulté.
Par contre, si je prolonge la macro pour fermer ce fichier:
Sub savecsvbis()
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:= _
"c:\fichiercsvbis.csv", FileFormat:=xlCSV, _
CreateBackup:=False
ActiveWindow.Close
End Sub
le fichier n'est plus aussi "lisible" et je ne peux plus l'exporter dans mon logiciel, les chiffres avec 2 décimales ayant été transformés.
Merci d'avance pour votre aide