Novice avance !?
XLDnaute Occasionnel
bonjour,
je voudrais copier les données d'un onglet dans un fichier texte.
Les données sont dans la 1ère colonne
le code ci-dessous me copie bien les données dans le fichier texte sauf qu'il me mets des
en début de ligne et en fin de ligne mais pas forcemment sur toutes les lignes.
j'aimerais ne pas avoir ces
exemple:
mon onglet excel avec les données en colonne A
et voici le fichier texte enregestré
merci par avance
je voudrais copier les données d'un onglet dans un fichier texte.
Les données sont dans la 1ère colonne
le code ci-dessous me copie bien les données dans le fichier texte sauf qu'il me mets des
Code:
"
j'aimerais ne pas avoir ces
Code:
"
Code:
ActiveWorkbook.SaveAs Filename:="D:\DATA\fichier.txt", _
FileFormat:=xlTextWindows, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
exemple:
mon onglet excel avec les données en colonne A
Code:
F:PT:NPT;
PT:8;
F:P:MNLP; MNCP; LIBP; ARR; X; Y; CAP; Z; NLP; NUM; CSV; ZONE; DXG; DYG;
P;ARMEN6:ARME;Nom1;P;994237,7109;1869129,448;344;;;244;;;;;
P;COLLI2:COLL;Nom2;P;994579,3176;1868873,515;1;;;1554;;;;;
P;DEPOT0:DEPO;Nom3;A;1001619;1873627;69;;;1437;;;;;
P;DEPSC1:DEPS;Nom4;A;998317;1867696;244;;;1498;;;;;
P;DEPSC9:DEPS;Nom5;A;998317;1867696;244;;;1499;;;;;
P;ECOLG2:ECOL;Nom6;P;994536,7271;1869277,996;1;;;362;;;;;
et voici le fichier texte enregestré
Code:
F:PT:NPT;
PT:8;
F:P:MNLP; MNCP; LIBP; ARR; X; Y; CAP; Z; NLP; NUM; CSV; ZONE; DXG; DYG;
"P;ARMEN6:ARME;Nom1;P;994237,7109;1869129,448;344;;;244;;;;;"
"P;COLLI2:COLL;Nom2;P;994579,3176;1868873,515;1;;;1554;;;;;"
P;DEPOT0:DEPO;Nom3;A;1001619;1873627;69;;;1437;;;;;
P;DEPSC1:DEPS;Nom4;A;998317;1867696;244;;;1498;;;;;
P;DEPSC9:DEPS;Nom5;A;998317;1867696;244;;;1499;;;;;
"P;ECOLG2:ECOL;Nom6;P;994536,7271;1869277,996;1;;;362;;;;;"
merci par avance