1 fichier xls en plusieurs fichier .csvLe 21/02/2020 à 18:34jjeromechantMembre fidèleMessages360Excel365Inscrit30/11/2018 Bonjour,Je dois envoyer sur un serveur un fichier en csv mais je suis limité par la taille.La taille maxi represente environ 1500 lignesJ'aimerai une macro qui transforme mon fichier en plusieurs fichier csv qui feront 1500 lignes et reprendrons la premier ligne de mon fichier xls.Le 21/02/2020 à 21:09Jean-EricFanatique d'ExcelMessages21'268Excel365 EN-FR (PC)Inscrit27/08/2012Bonjour,Une proposition à étudier.Les fichiers sont enregistrés dans le répertoire du fichier xlsm.Les fichiers sont enregistrés en UTF8.A te relire.Cdlt. 137jeromechant.xlsm (487.63 Ko) Le 22/02/2020 à 17:25jjeromechantMembre fidèleMessages360Excel365Inscrit30/11/2018Un mot : SuperMerciLe 22/02/2020 à 22:13jjeromechantMembre fidèleMessages360Excel365Inscrit30/11/2018Bonjour,Je voudrais complète cette macro en enregistrant que les colonel de A a JC'est possible ?Le 23/02/2020 à 07:51Jean-EricFanatique d'ExcelMessages21'268Excel365 EN-FR (PC)Inscrit27/08/2012Bonjour,Dans la procédure VBA, remplace lastCol = .Cells(1, .Columns.Count).End(xlToLeft).Column par lastCol = 10.Cdlt.Le 23/02/2020 à 18:46jjeromechantMembre fidèleMessages360Excel365Inscrit30/11/2018merci,et si je voulais faire les colonne de D à K ? ( c'est pour ma culture personnel )MerciLe 23/02/2020 à 19:15Jean-EricFanatique d'ExcelMessages21'268Excel365 EN-FR (PC)Inscrit27/08/2012 Bonjour,Modifier la la définition des plages :Set rngHeaders = .Cells(4).Resize(, 8)Set rngData = Union(rngHeaders, .Cells(lRow, 4).Resize(X - 1, 8))Cdlt.Rechercher des sujets similaires à "fichier xls csv"ForumsExcel - VBA1 fichier xls en plusieurs fichier .csv