XLS2CSV Convertir un fichier Excel (.xls) vers un ou des fichiers .csv
Par PlaceOweb le lundi, octobre 20 2008, 00:24 - Système - Lien permanent
Vous devez convertir document Excel pour enregistrer chacune des feuilles vers un fichier .csv
Les possibilités de transformation d'un document Excel vers un/des document(s) csv sont multiples :
- Utiliser des programmes de conversion tout fait :
- XLS2CSV 1.2 (gratuit) de Baligh BABA-ALI permet de convertir uniquement votre première feuille vers un fichier csv
- CZ-Xls2Csv for MS Excel V1.0 (payant, mais gratuit pour vos 50 premières conversion xls vers csv) permet de convertir chacune de vos feuilles Excel vers des fichiers csv (1 par feuille)
- Faire un macro pour exporter chacune de vos feuilles Excel vers un fichier .csv distinct, ici je vous propose 2 macros (a insérer par copie dans votre document xls : Outil->Macro->Visual Basic Editor) d'exportations XLS2CSV générant vos fichiers csv à la racine de votre disque C:\
Sub Placeoweb_XLS2CSV_OneFileBySheet() Application.DisplayAlerts = False Application.ScreenUpdating = False For Each feuilleEnCours In ThisWorkbook.Sheets feuilleEnCours.Select feuilleEnCours.Copy ActiveWorkbook.SaveAs Filename:="C:\placeoweb.com.xls2csv." & feuilleEnCours.Name & ".csv", FileFormat:=xlCSV, CreateBackup:=False, local:=True ActiveWorkbook.Close SaveChanges:=False Next Application.ScreenUpdating = True Application.DisplayAlerts = True MsgBox ("Exportation terminée, retouvez vos fichier à la racine dans le C:\") End Sub
Sub Placeoweb_XLS2CSV_OneFileBySheetOtherMethod() Application.DisplayAlerts = False Application.ScreenUpdating = False For Each feuilleEnCours In ThisWorkbook.Sheets Set nouveauClasseur = Workbooks.Add(template:=xlWBATWorksheet) feuilleEnCours.Cells.Copy nouveauClasseur.Sheets(1).Range("A1") nouveauClasseur.SaveAs Filename:="C:\placeoweb.com.xls2csv." & feuilleEnCours.Name & ".csv", FileFormat:=xlCSV, CreateBackup:=False nouveauClasseur.Close SaveChanges:=True Next Application.ScreenUpdating = True Application.DisplayAlerts = True MsgBox ("Exportation terminée, retrouvez vos fichier à la racine dans le C:\") End Sub
** VBA > Interaction avec d'autres applications > Applications Office > Excel explique des notions de codage des macro en Visual Basic for Applications
- Coder en java, php ou autre langage, un lecteur xls pour écrire un fichier csv par feuille (spreadsheet)