☰

Gibt es ein Tool, mit dem Sie Excel-Tabs stapelweise in CSV exportieren können?

tag-icon • tag-icon windows-7 microsoft-excel microsoft-excel-2010
Gibt es ein Tool, mit dem Sie Excel-Tabs stapelweise in CSV exportieren können?

Ich habe Excel 2010.

Ich habe es gefunden:Batch-Konverter von XLS in CSV

Aber ich muss eigentlich alle Excel-Arbeitsblätter als einzelne CSV-Dateien exportieren. Ich bin mir nicht sicher, ob das so funktioniert. Und wenn ich die obige Methode verwenden würde, wie verwende ich dann eigentlich ein VB-Skript? (keine Programmierkenntnisse)

Antwort1

Hier ist eine bereinigte Version des Skripts aus dem Beitrag, auf den Sie verlinkt haben:

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

Es sollte tun, was Sie wollen. Sie rufen es folgendermaßen von einer Eingabeaufforderung aus auf:

cscript SCRIPT.vbs INPUT.xls

Es erstellt Ausgabedateien INPUT_SHEETNAME.csv.

verwandte Informationen