Discussion :

[TOFatJOB]

Bonjour,

j'ai une macro qui génère un fichier .csv pour transmission d'informations à un organisme.

Mon problème : si la chaîne contient 1 valeur avec décimale, l'enreg est encadré par des doubles quotes ...



J'ai tenté de convertir ma data avec Cstr sans succès... Mes variables sont de type : val(v) = Round(Cells(lin, jour).Value, 2)

si je définis : Dim val2(v) as string elle n'est pas alimentée par val2(v) = Cstr(val(v))



en attendant une éventuelle solution, bonne et joyeuse nouvelle année à tous

[Jean-Philippe André]

Bonjour,

de base, un csv utilise la virgule comme séparateur de valeur, et le point pour le séparateur décimal.

Si l'un ou l'autre de ces séparateurs n'est pas celui que tu souhaites utiliser, peux tu nous montrer tout d'abord ta syntaxe d'enregistrement ?

[TOFatJOB]

re,

ma macro créée le nouveau csv :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Set newBook = Workbooks.Add 'création
            newBook.SaveAs chemin & "PIXID" & aa & mm & ".csv", FileFormat _
                :=xlCSV, CreateBackup:=False

alimente les enregs avec une boucle :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Range("A" & ligne & "").Value = mat & ";" & nom & ";" & prenom & ";" & jj2 & "/" & mm2 & "/" & aa2 & ";" & val(1) & ";" & val(2) & ";" & val(3) & ";" & val(4) & ";" & val(5) & ";" & val(6) & ";" & val(7) & ";" & val(8) & ";" & val(9) & ";" & val(10) & ";" & val(11)

puis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveWorkbook.Save

[jurassic pork]

Hello,
dans le SaveAs essaie de mettre le paramètre Local à True ( Local:=True)

Local Facultatif Variant : True enregistre les fichiers par rapport à la langue de Microsoft Excel (y compris les paramètres du Panneau de configuration). False (valeur par défaut) enregistre les fichiers dans la langue de Visual Basic pour Applications (VBA) (qui est généralement anglais américain, sauf si le projet VBA à partir duquel Workbooks.Open est exécuté est un ancien projet VBA XL5/95 internationalisé).

Ami calmant, J.P

[TOFatJOB]

Bonjour,

j'ai essayé les options Local:=True sans succès.

Le prestataire intègre le fichier en l'état sans problème, il s'agit en fait d'un affichage capricieux dans le bloc notes ...

Je clos donc ce post.

Merci à ceux qui ont passé du temps.