Voir la source de Importer des CSV en masse

Chaque CSV est localisé dans un répertoire dédié sous la forme
 "1","01","Ain","AIN","ain","A500"
 "2","02","Aisne","AISNE","aisne","A250"
 "3","03","Allier","ALLIER","allier","A460"
 "5","05","Hautes-Alpes","HAUTES-ALPES","hautes-alpes","H32412"
 ...
* La 2nde colonne du CSV doit être considérée comme du texte
Une feuille nommée "CSV_" suivi d'un numéro incrémenté sera créée.
 Sub Main
 	GlobalScope.BasicLibraries.loadLibrary ("zBasic")
 	
 	sChemin = "c:\temp\test"
 	oTablo = [[zBasic.ListeFichiers]](sChemin, "csv")
 	oListe = [[zTable.VersListe]](oTablo)
 	for each sFichier in oListe
 		i=i+1
 		oFiltre = [[zCSV.Demarre]](sFichier,"V")
 		[[zCSV.Parametre]](oFiltre, "JEU", "UTF-8")
 		[[zCSV.Colonne]](oFiltre, 2, "TEXTE")
 		[[zFeuille.Importe]](sFichier, "CSV_" & i, oFiltre)
 	next
 End Sub
[[Catégorie:Exemple]]