Tengo Excel 2010.
Encontró esto:Convertidor por lotes de XLS a CSV
Pero en realidad necesito exportar todas las hojas de cálculo de Excel como archivos CSV individuales. No estoy seguro si funciona de esa manera. Además, si tuviera que utilizar el método anterior, ¿cómo uso realmente un script VB? (no estoy familiarizado con la programación)
Respuesta1
Aquí hay una versión limpia del script de la publicación a la que vinculó:
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
Debería hacer lo que quieras. Lo llamas así desde un símbolo del sistema:
cscript SCRIPT.vbs INPUT.xls
Crea archivos de salida INPUT_SHEETNAME.csv
.