Wie konvertiere ich mehrere Arbeitsmappen oder Arbeitsblätter gleichzeitig in Excel in PDF-Dateien?
Manchmal müssen Sie Ihre Excel-Dateien in PDF-Dateien konvertieren, damit sie nicht von anderen geändert werden können. In Excel können wir eine Excel-Datei mithilfe der Funktion Speichern unter als PDF-Datei speichern. Aber wie konvertieren Sie in Excel mehrere Arbeitsmappen gleichzeitig in PDF-Dateien?
- Konvertieren Sie mehrere Arbeitsmappen nacheinander in PDF-Dateien mit der Funktion Speichern unter
- Konvertieren Sie mehrere Arbeitsmappen gleichzeitig in PDF-Dateien mit VBA-Code
- Konvertieren Sie mehrere Arbeitsmappen in PDF-Dateien mit einer leistungsstarken Funktion
- Konvertieren Sie mehrere Arbeitsblätter aus einer Arbeitsmappe in separate PDF-Dateien mit VBA-Code
- Konvertieren Sie mehrere Arbeitsblätter aus einer Arbeitsmappe in separate PDF-Dateien mit einer praktischen Funktion
Konvertieren Sie mehrere Arbeitsmappen nacheinander in PDF-Dateien mit der Funktion Speichern unter
Normalerweise können Sie mit der Funktion Speichern unter in Excel die gesamte Arbeitsmappe in einer PDF-Datei speichern. Gehen Sie dazu folgendermaßen vor:
1. Starten Sie Ihre Arbeitsmappe, die Sie in das PDF-Format konvertieren möchten.
2. Klicken Sie Reichen Sie das > Speichern unter, und in der Speichern unter Im Dialogfeld geben Sie einen Ordner zum Speichern der neuen Datei an und wählen Sie dann PDF von dem Speichern als Typ Dropdown-Liste, und klicken Sie dann auf Optionen Schaltfläche, siehe Screenshot:
3. Dann tauchte das auf Optionen Dialogfeld überprüfen Komplettes Arbeitsheft, siehe Screenshot:
4. Und dann klick OK > SpeichernDiese gesamte Arbeitsmappe wurde als PDF-Dateiformat gespeichert.
Konvertieren Sie mehrere Arbeitsmappen gleichzeitig in PDF-Dateien mit VBA-Code
Wenn Hunderte von Excel-Dateien konvertiert werden müssen, ist die oben beschriebene Methode problematisch. Hier werde ich über einen VBA-Code zum gleichzeitigen Konvertieren mehrerer Arbeitsmappen in PDF-Dateien sprechen. Führen Sie die folgenden Schritte aus:
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Konvertieren Sie mehrere Arbeitsmappen gleichzeitig in PDF-Dateien
Sub ExcelSaveAsPDF()
'Updateby Extendoffice
Dim strPath As String
Dim xStrFile1, xStrFile2 As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath, xWBName As String
Dim xBol As Boolean
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the Excel files you want to convert:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a destination folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
xStrFile1 = Dir(strPath & "*.*")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While xStrFile1 <> ""
xBol = False
If Right(xStrFile1, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xls", "_pdf")
xBol = True
ElseIf Right(xStrFile1, 4) = "xlsx" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xlsx", "_pdf")
xBol = True
ElseIf Right(xStrFile1, 4) = "xlsm" Then
Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
xbwname = Replace(xStrFile1, ".xlsm", "_pdf")
xBol = True
End If
If xBol Then
xWbk.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xRPath & xbwname & ".pdf"
xWbk.Close SaveChanges:=False
End If
xStrFile1 = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Dann drücken F5 Wenn Sie diesen Code ausführen, wird ein Fenster angezeigt. Wählen Sie einen Ordner aus, der die Arbeitsmappen enthält, die Sie konvertieren möchten. Siehe Screenshot:
4. Dann klick OKWenn ein weiteres Fenster geöffnet wird, wählen Sie einen Ordnerpfad aus, in dem Sie die neuen PDF-Dateien ausgeben möchten. Siehe Screenshot:
5. Und dann, Clik OKNach Abschluss der Konvertierung können Sie in den angegebenen Ordner wechseln, um eine Vorschau des konvertierten Ergebnisses anzuzeigen. Siehe Screenshots:
Konvertieren Sie mehrere Arbeitsmappen in PDF-Dateien mit einer leistungsstarken Funktion
Wenn Sie Kutools for ExcelMit seinen Formatkonverter Mit diesem Dienstprogramm können Sie schnell mehrere Arbeitsmappen gleichzeitig in PDF-Dateien konvertieren.
Nach der Installation Kutools for ExcelBitte machen Sie Folgendes:
1. Klicken Sie Kutoolen Plus > Workbook > Formatkonverter, siehe Screenshot:
2. Außerdem wird ein Eingabeaufforderungsfeld angezeigt, das Sie daran erinnert, dass Sie die Arbeitsmappen schließen müssen, die Sie konvertieren möchten.
3. Klicken Sie OKdann in der Dateiformatkonverter Geben Sie im Dialogfeld die folgenden Optionen an:
- Unter dem Typ konvertieren Dropdown-Liste auswählen Excel-Arbeitsmappe als PDF;
- Dann klick Speichern Klicken Sie auf die Schaltfläche, um die Excel-Dateien hinzuzufügen, die Sie konvertieren möchten. Sie können die Arbeitsmappen nach Bedarf von Ihrer Computerdiskette oder OneDrive hinzufügen.
4. Nachdem Sie die zu konvertierenden Arbeitsmappen eingefügt haben, befinden Sie sich noch in der Dateiformatkonverter Dialogfeld klicken Sie bitte Klicken Sie auf die Schaltfläche, um einen Ordnerpfad für die Ausgabe der konvertierten Dateien auszuwählen, und geben Sie dann unten im Dialogfeld einige Vorgänge an, die Sie benötigen (siehe Abbildung):
- Wenn die Arbeitsmappen in den Unterordnern ebenfalls konvertiert werden mussten, überprüfen Sie bitte die Fügen Sie beim Hinzufügen von Ordnern Unterordner hinzu Kontrollkästchen;
- Wenn Sie die Originaldateien nach der Konvertierung entfernen möchten, überprüfen Sie bitte die Löschen Sie die Quelldateien nach der Konvertierung Box;
- Wenn Sie das Änderungsdatum der Originaldateien beibehalten möchten, überprüfen Sie bitte die Behalten Sie das Änderungsdatum der Originaldateien bei Box;
- Die Verzeichnisstruktur der Datei kann durch Überprüfen von beibehalten werden Die Verzeichnisstruktur der Datei bleibt bei der Konvertierung erhalten Box;
5. Dann klick OK Wenn alle angegebenen Excel-Dateien in die PDF-Dateien konvertiert wurden, können Sie in den angegebenen Ordner wechseln, um eine Vorschau des konvertierten Ergebnisses anzuzeigen (siehe Screenshots).
Konvertieren Sie mehrere Arbeitsblätter aus einer Arbeitsmappe in separate PDF-Dateien mit VBA-Code
In einigen Fällen möchten Sie möglicherweise jedes Arbeitsblatt in der Arbeitsmappe in separate PDF-Dateien konvertieren. Wenn Ihre Arbeitsmappe viele Blätter enthält, können Sie mit dem folgenden VBA-Code jedes Arbeitsblatt gleichzeitig als PDF-Datei speichern.
1. Öffnen Sie eine Arbeitsmappe, die Sie konvertieren möchten, und halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Konvertieren Sie mehrere Arbeitsblätter aus einer Arbeitsmappe in separate PDF-Dateien
Sub SplitEachWorksheet()
'Updateby Extendoffice
Dim xSPath As String
Dim xSFD As FileDialog
Dim xWSs As Sheets
Dim xWb As Workbook
Dim xWbs As Workbooks
Dim xNWb As Workbook
Dim xInt, xI As Integer
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.title = "Please select a folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWb = Application.ActiveWorkbook
Set xWbs = Application.Workbooks
Set xWSs = xWb.Sheets
Set xNWb = xWbs.Add
xInt = xWSs.Count
For xI = 1 To xInt
On Error GoTo EBreak
Set xWs = xWSs.Item(xI)
If xWs.Visible Then
xWSs(xWs.Name).Copy
Application.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xSPath & "\" & xWs.Name & ".pdf"
Application.ActiveWorkbook.Close False
End If
EBreak:
Next
xWb.Activate
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. Dann drücken F5 Wählen Sie einen Ordnerpfad zum Auffinden der konvertierten PDF-Dateien aus, um diesen Code auszuführen. Wenn ein Fenster geöffnet wird, siehe Screenshot:
4. Dann klick OK Schaltfläche, alle Arbeitsblätter in der aktuellen Arbeitsmappe wurden PDF-Dateien separat konvertiert, siehe Screenshot:
Konvertieren Sie mehrere Arbeitsblätter aus einer Arbeitsmappe in separate PDF-Dateien mit einer praktischen Funktion
Kutools for Excel unterstützt auch eine nützliche Funktion - Arbeitsmappe teilenMit dieser Funktion können Sie mehrere Arbeitsblätter in der Arbeitsmappe speichern, um Excel-Datei, TXT-Datei, CSV-Datei und PDF-Datei nach Bedarf zu trennen.
Nach der Installation Kutools for ExcelBitte machen Sie Folgendes:
1. Öffnen Sie die Arbeitsmappe, in der Sie jedes Blatt als PDF-Datei speichern möchten, und klicken Sie dann auf Kutool Plus > Workbook > Arbeitsmappe teilen, siehe Screenshot:
2. In dem Arbeitsmappe teilen Aktivieren Sie im Dialogfeld das Blatt, das Sie speichern möchten, und wählen Sie dann aus PDF (* .pdf) von dem Speichern als Typ Dropdown-Liste, und klicken Sie dann auf Split Schaltfläche, in der Ordner auswählen Geben Sie im Fenster einen Ordner zum Ablegen der konvertierten Dateien an, siehe Screenshot:
3. Anschließend wurden alle ausgewählten Arbeitsblätter in der aktuellen Arbeitsmappe einzeln in PDF-Dateien gespeichert (siehe Abbildung):
Weitere relative Artikel:
- Konvertieren Sie mehrere XLS-Dateien in Xlsx-Dateien in Excel
- Um eine alte XLS-Excel-Datei in eine neue XLSX-Datei zu konvertieren, können Sie die Funktion Speichern unter in Excel anwenden. Wenn jedoch mehrere XLS-Dateien konvertiert werden müssen, wie kann diese Aufgabe schnell und einfach erledigt werden?
- Speichern Sie alle Arbeitsblätter nur als Werte
- Wenn Sie eine Arbeitsmappe haben, die mehrere Formeln enthält, müssen Sie diese Datei jetzt an andere Benutzer verteilen. Sie möchten die Formeln nicht anzeigen, sondern nur Werte anzeigen. Normalerweise können wir ein Arbeitsblatt schnell als Werte speichern, indem wir die Daten nur als Werte kopieren und einfügen. Aber wie können Sie alle Arbeitsblätter nur als Werte speichern, ohne sie einzeln zu kopieren und einzufügen?
- Befehlsschaltfläche zum Speichern des aktiven Arbeitsblatts als PDF-Datei
- Während der Arbeit in Microsoft Excel kann das Problem auftreten, dass das aktive Arbeitsblatt als PDF-Datei gespeichert wird. In diesem Artikel erfahren Sie, wie Sie ein aktives Arbeitsblatt als PDF-Datei mit VBA-Code über eine Befehlsschaltfläche speichern. Wenn Sie auch einen Bereich oder jedes Arbeitsblatt in einer aktiven Arbeitsmappe als einzelne PDF-Datei speichern möchten, kann Ihnen dieser Artikel ebenfalls helfen.
- Teilen Sie einen großen Tisch in mehrere kleine Tische auf
- Wenn Sie ein großes Arbeitsblatt haben, das mehrere Spalten und Hunderte oder Tausende von Zeilendaten enthält, möchten Sie diese große Tabelle jetzt basierend auf dem Spaltenwert oder der Anzahl der Zeilen in mehrere kleine Tabellen aufteilen, um die folgenden Ergebnisse zu erhalten. Wie können Sie mit dieser Aufgabe in Excel umgehen?
- Teilen Sie eine Arbeitsmappe, um Excel-Dateien zu trennen
- Möglicherweise müssen Sie eine große Arbeitsmappe aufteilen, um Excel-Dateien zu trennen, und jedes Arbeitsblatt der Arbeitsmappe als einzelne Excel-Datei speichern. Sie können beispielsweise eine Arbeitsmappe in mehrere einzelne Excel-Dateien aufteilen und dann jede Datei an eine andere Person senden, um sie zu verarbeiten. Auf diese Weise können Sie bestimmte Personen dazu bringen, mit bestimmten Daten umzugehen, und Ihre Daten schützen. In diesem Artikel werden Möglichkeiten zum Aufteilen einer großen Arbeitsmappe in separate Excel-Dateien basierend auf jedem Arbeitsblatt vorgestellt.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten 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!