cs_ludwig89
Messages postés47Date d'inscriptionmercredi 1 septembre 2004StatutMembreDernière intervention18 septembre 2009
-
16 juin 2008 à 11:17
cs_ludwig89
Messages postés47Date d'inscriptionmercredi 1 septembre 2004StatutMembreDernière intervention18 septembre 2009
-
16 juin 2008 à 11:48
bonjour a tous
voila j'ai des donnée dans un fichier excel
je voudrai exporter le contenu de la collone 1 dans un fichier texte quelques soit le nombre de ligne.
mes donneés sont sous le format :
"LAGUNE";1496.000;428.000;754.000;220.000;0;"CD";"COULIS D H0428x1496 01F128";"VANILLE BRILLANT 1001";
quand j'enregistre sous format, textunicode; csv ; textmsdos il me double les guillemet a chaque fois, comment enregister sous un fichier text toutes les lignes sans aucune modifications, respect de guillemet et point virgule
cs_ludwig89
Messages postés47Date d'inscriptionmercredi 1 septembre 2004StatutMembreDernière intervention18 septembre 2009 16 juin 2008 à 11:48
pour info j'ai trouver le soluce (mais pas tous eul comme un grand) ;-)
sur un autre forum
Sub Exporttexte()
numfic = FreeFile()
Dim LeTexte As String
Dim lignelue As Integer
Open "E:\CMSMDF\ORDER\nested.r" For Output As #numfic
n = Feuil1.Cells(65536, 1).End(xlUp).Row
For i = 1 To n
LeTexte = Feuil1.Cells(i, 1).Value
Print #numfic, LeTexte
Next i
Close #numfic
End Sub
mais meric qd meme pour l'intéret porté a ma question