OS X Excel 2008: Exportieren Sie alle Dokumentblätter in getrennte Registerkarten

931
Keefer

Ist es möglich, mehrere Blätter in einem Excel-Dokument als Massenexport zu exportieren, um durch Tabulatoren getrennte Textdateien zu trennen? Es exportiert nur das aktive Blatt. Ich habe ein Dokument mit 850 Blättern, die ich alle als tabulatorgetrennt exportieren möchte.

1
Schauen Sie [hier] (http://stackoverflow.com/questions/9805124/need-to-modify-this-export-macro-for-text-tab-delimited-output) oder [hier] (http: // stackoverflow.com/questions/59075/macro-to-save-each-sheet-in-an-excel-workbook-to-separate-csv-files) Raystafarian vor 12 Jahren 0
Ich sollte beachten, dass ich auf OS X Excel 2008 bin. Eine Lösung verwendet Sachen mit shell32.dll. Wir haben dem schon einen Schuß gegeben, sind dort aber gescheitert. Keefer vor 12 Jahren 0

1 Antwort auf die Frage

1
mischab1

Schnell und einfach wäre so etwas:

Public Sub ExportSheets(wbk As Workbook, sPath As String) Dim sht As Worksheet For Each sht In wbk.Worksheets sht.Select sht.SaveAs sPath & sht.Name & ".txt", XlFileFormat.xlTextMac Next sht wbk.Close MsgBox "Done exporting." End Sub 

Unter Windows würden Sie dies aufrufen, indem Sie ExportSheets ActiveWorkbook, "C:\Data\"im unmittelbaren Fenster eingeben .

Hinweis: Ich schließe die Arbeitsmappe, wenn sie fertig ist, da die Arbeitsmappe jetzt die zuletzt gespeicherte Textdatei und nicht die ursprüngliche Arbeitsmappe ist.