Existe-t-il un outil permettant d'exporter par lots des onglets Excel vers CSV?


3

J'ai Excel 2010.

Trouvé ceci: Convertisseur de lots XLS en CSV

Mais je dois en fait exporter toutes les feuilles de calcul Excel sous forme de fichiers CSV individuels. Pas sûr que ça marche comme ça. De plus, si je devais utiliser la méthode ci-dessus, comment utiliser un script VB? (pas familier avec la programmation)


en utilisant Windows 7
AKA

Il suffit d’utiliser COM de Python pour les recracher.
Ignacio Vazquez-Abrams le

Pour utiliser les fonctionnalités VBA d'Excel, appuyez sur Alt + F11. Ensuite, allez dans 'Insert' -> 'Module'. Votre code va dans la fenêtre de texte qui s'ouvre.
Excellll

Réponses:


2

Voici une version épurée du script de la publication à laquelle vous avez lié:

Option Explicit

Const xlXMLSpreadsheet = 46
Const xlCSV = 6

Dim xl, wb, ws

Dim args : Set args = WScript.Arguments

If args.Count <> 1 Then
  WScript.Echo "Syntax: cscript " & WScript.ScriptName & " filename"
  WScript.Quit(1)
End If

Set xl = CreateObject("Excel.Application")
Set wb = xl.Workbooks.Open(args(0))

xl.DisplayAlerts = False
For Each ws In wb.Worksheets
 ws.activate
 wb.SaveAs CreateObject("Scripting.FileSystemObject").GetBaseName(args(0)) _
   & "_" & Replace(ws.Name, " ", "_") & ".csv", xlCSV
Next
xl.DisplayAlerts = True

wb.Close False
xl.Quit
WScript.Quit

Il faut faire ce que tu veux. Vous l'appelez comme ceci à partir d'une invite de commande:

cscript SCRIPT.vbs INPUT.xls

Il crée des fichiers de sortie INPUT_SHEETNAME.csv.

En utilisant notre site, vous reconnaissez avoir lu et compris notre politique liée aux cookies et notre politique de confidentialité.
Licensed under cc by-sa 3.0 with attribution required.