Fichier CVS de plus de 256 colonnes

[Patrice]

Bonjour,

Je dois générer un fichier plat pour une migration de données, mais commportant plus de 300 colonnes
Je les réparti sur deux onglets, mais à l'export je ne puis les sauvegarder d'un seul coup
Si je sauvegarde deux fichiers CSV, j'essaye de les importer dans Excel comme étant deux colonnes uniquement et je resauvegarde ensuite.
Le pb est qu'il génére des ' pour encadrer mes deux zones résultantes et je ne trouve pas de ruse pour exporter mes 300 colonnes avec un ; comme séparteurs en une seule fois !
Si je suis arrivé à me faire comprendre, j'espère qu'une personne bien attentionnée me donnera un coup de main, ou une idée !!! car je je sais comment faire sinon faire de la programmation VBA
D'avance merci à toutes/Tous
Pat

 

[Papaye]

Bonjour Patrice,

As tu essayé de te créer un nouveau fichier texte en faisant lire le premier et en remplacant les ' par rien.

Ca doit ressembler à

Open NomRep & 'Monfichier2.txt' For Output As #2
Do While Not EOF(1) ' Effectue la boucle jusqu'à la fin du fichier.
Line Input #1, MaLigne
MaLigneAmoi = Application.WorksheetFunction.Substitute(MaLigne, ',', ';')
Print #2, MaLigneAmoi
Loop
Close #1
Close #2


Papaye

 

[Papaye]

Ma petite Papaye,

Tu aurais pu dire qu'il fallait mettre avant ce code :

Open 'Monfichier2.txt' For Input As #1 ' Ouvre le fichier.

 

[Patrice]

SUPER !
merci de vos réponses, je vais essayer votre solution
Bon we à vous
Patrice