Wie speichere ich jedes Blatt als separate Textdatei aus einer Arbeitsmappe?
Wenn Sie ein Arbeitsblatt als Textdatei speichern möchten, können Sie die Excel-Funktion Speichern unter verwenden, um das Arbeitsblatt als Textdatei zu speichern. Wenn Sie jedoch jedes Blatt einer Arbeitsmappe als separate Textdatei speichern möchten, müssen Sie die Schritte Speichern unter irritieren. Hier stelle ich Ihnen einige interessante Tricks vor, mit denen Sie diesen langweiligen Job in Excel schnell lösen können.
Speichern Sie ein Blatt als Textdatei mit VBA
Speichern Sie jedes Blatt einer Arbeitsmappe als separate Textdatei mit Kutools for Excel
Exportieren Sie eine Blattauswahl als Textdatei mit Kutools for Excel
Speichern Sie ein Blatt als Textdatei mit VBA
Wenn Sie die Funktion Speichern unter nicht zum Speichern von Blättern als Textdatei verwenden möchten, können Sie VBA-Code verwenden.
1. Aktivieren Sie das Blatt, das Sie als Textdatei speichern möchten.
2. Drücken Sie Alt + F11 Tasten zum Anzeigen Microsoft Visual Basic für Applikationen Fenster.
3 Klicken Insert > Modul aus dem Fenster und fügen Sie dann den folgenden VBA-Code in das Modul ein.
VBA: Blatt als Textdatei speichern.
Sub SaveSheetToTxt()
'Updateby20150910
Dim xRet As Long
Dim xFileName As Variant
On Error GoTo ErrHandler:
xFileName = Application.GetSaveAsFilename(ActiveSheet.Name, "TXT File (*.txt), *.txt", , "Kutools for Excel")
If xFileName = False Then Exit Sub
If Dir(xFileName) <> "" Then
xRet = MsgBox("File '" & xFileName & "' exists. Overwrite?", vbYesNo + vbExclamation, "Kutools for Excel")
If xRet <> vbYes Then
Exit Sub
Else
Kill xFileName
End If
End If
ActiveSheet.Copy
ActiveWorkbook.SaveAs xFileName, xlUnicodeText
If ActiveWorkbook.Name <> ThisWorkbook.Name Then
ActiveWorkbook.Close False
End If
My_Exit:
Exit Sub
ErrHandler:
MsgBox Err.Description, , "Kutools for Excel"
End Sub
4 Klicken Führen Sie Schaltfläche, um den Code auszuführen, und dann in der Kutools for Excel Wählen Sie im Dialogfeld einen Ordner für die Textdatei aus und geben Sie einen Namen für die Textdatei an. Siehe Screenshot:
5 Klicken Speichern. Jetzt wird das aktive Blatt als Textdatei gespeichert.
TIPP: Mit dem VBA können Sie jeweils nur ein Blatt als Textdatei speichern.
Speichern Sie jedes Blatt einer Arbeitsmappe als separate Textdatei mit Kutools for Excel
Wenn Sie eine große Arbeitsmappe mit Hunderten von Blättern haben, die zum Speichern in separaten Textdateien benötigt werden, ist die VBA-Methode ebenfalls zeitraubend. In diesem Fall können Sie versuchen, zu verwenden Kutools for Excel Arbeitsmappe teilen mit diesem Job fertig zu werden, der Sie eine unerwartete Überraschung geben wird.
Kutools for Excel, mit mehr als 300 praktische Funktionen erleichtern Ihre Arbeit. |
Nachher kostenlose Installation Kutools for ExcelBitte machen Sie wie folgt:
1. Aktivieren Sie die Arbeitsmappe, deren Blätter Sie als unabhängige Textdateien speichern möchten, und klicken Sie dann auf Kutoolen Plus > Workbook > Arbeitsmappe teilen. Siehe Screenshot:
2. In dem Arbeitsmappe teilen Wählen Sie im Dialogfeld die Blätter aus, die Sie teilen und als Textdateien speichern möchten. Standardmäßig sind alle Blätter ausgewählt, und überprüfen Sie sie Geben Sie das Sicherungsformat an, Und wählen Sie Unicode-Text (*. Txt) von unten Dropdown-Liste. Siehe Screenshot:
3 Klicken Splitund wählen Sie dann einen Ordner aus, aus dem die Textdateien abgelegt werden sollen Suche nach Ordner Dialog. Siehe Screenshot:
4 Klicken OK. Jetzt wird jedes Blatt der Arbeitsmappe als separate Textdatei im ausgewählten Ordner gespeichert.
Mit Arbeitsmappe teilen of Kutools for Excelkönnen Sie eine Arbeitsmappe teilen und als separate XLS-Dateien, XLSX-Dateien, PDF-Dateien oder CSV-Dateien speichern. Klicken Sie hier, um mehr über dieses Dienstprogramm zu erfahren.
Klicken Sie hier zum kostenlosen Download Kutools for Excel
Exportieren Sie eine Blattauswahl als Textdatei mit Kutools for Excel
Mit Kutools for ExcelSie können auch eine Auswahl eines Blattes als Textdatei exportieren, indem Sie dessen verwenden Bereich in Datei exportieren.
Kutools for Excel, mit mehr als 300 praktische Funktionen erleichtern Ihre Arbeit. |
Nachher kostenlose Installation Kutools for ExcelBitte machen Sie wie folgt:
1. Wählen Sie einen Bereich oder Bereiche aus, die Sie als Textdatei speichern möchten, und klicken Sie auf Kutoolen Plus > Import / Export > Bereich in Datei exportieren. Siehe Screenshot:
2. Überprüfen Sie dann im Popping-Dialogfeld Unicode-Text Option unter Datei Format Abschnitt, dann gehen Sie zu Textoptionen Abschnitt, um eine Option nach Bedarf zu überprüfen und dann einen Speicherort auszuwählen.
3 Klicken Ok. Benennen Sie nun die exportierte Textdatei im Popping Bereich in Datei exportieren Klicken Sie auf das Dialogfeld OK .
Bisher wurde die Auswahl als separate Textdatei exportiert.
Es gibt mehr als 120 Werkzeuge Kutools for ExcelWenn Sie es installieren und 60 Tage lang testen möchten, finden Sie möglicherweise viele ungeahnte nützliche Funktionen.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools for Excelund erleben Sie Effizienz wie nie zuvor. Kutools for Excel Bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt eine Tab-Oberfläche in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
