Wie verwendet man eine Befehlsschaltfläche, um das aktive Arbeitsblatt als PDF-Datei in Excel zu speichern?
Während der Arbeit in Microsoft Excel kann es vorkommen, dass Sie das aktive Arbeitsblatt als PDF-Datei speichern möchten. In diesem Artikel erfahren Sie, wie Sie mithilfe eines VBA-Codes und einer Befehlsschaltfläche das aktive Arbeitsblatt als PDF speichern können. Außerdem unterstützt Sie dieser Artikel, wenn Sie auch einen bestimmten Bereich oder jedes Arbeitsblatt in der aktuellen Arbeitsmappe als separate PDF-Dateien exportieren möchten.
Verwenden Sie eine Befehlsschaltfläche, um das aktive Arbeitsblatt mit VBA-Code als PDF-Dateien zu speichern
Speichern Sie mühelos das aktive oder jedes Arbeitsblatt als einzelne PDF-Dateien mit Kutools für Excel
Verwenden Sie eine Befehlsschaltfläche, um das aktive Arbeitsblatt mit VBA-Code als PDF-Dateien zu speichern
Führen Sie den folgenden VBA-Code aus, um das aktive Arbeitsblatt beim Klicken auf eine Befehlsschaltfläche als PDF-Datei zu speichern – so geht’s:
1. Erstellen Sie zunächst einen Ordner mit dem Namen „PDF“, um Ihre neu konvertierten PDF-Dateien darin zu speichern. In diesem Beispiel lege ich diesen Ordner auf meiner lokalen Festplatte (C:) an.
2. Fügen Sie eine Befehlsschaltfläche ein, indem Sie auf Entwickler > Einfügen > Befehlsschaltfläche (ActiveX-Steuerelement) klicken. Siehe Screenshot:
2. Zeichnen Sie dann eine Befehlsschaltfläche in das Arbeitsblatt, in dem Sie neue Zeilen hinzufügen möchten. Klicken Sie mit der rechten Maustaste auf die Schaltfläche und wählen Sie im Kontextmenü Eigenschaften.
3. Geben Sie im Dialogfeld Eigenschaften den gewünschten Anzeigetext der Befehlsschaltfläche in das Feld Beschriftung unter der Registerkarte Kategorisiert ein und schließen Sie anschließend das Dialogfeld.
Sie sehen, dass sich der Anzeigetext der Befehlsschaltfläche wie im folgenden Screenshot gezeigt hat.
4. Klicken Sie erneut mit der rechten Maustaste auf die Befehlsschaltfläche und wählen Sie im Kontextmenü Code anzeigen.
5. Ersetzen Sie im geöffneten Fenster Microsoft Visual Basic für Applikationen den ursprünglichen Code im Code-Fenster durch den folgenden VBA-Code.
VBA-Code: Befehlsschaltfläche zum Speichern des aktiven Arbeitsblatts als PDF
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="C:\PDF\Export.pdf", _
OpenAfterPublish:=False
Application.ScreenUpdating = True
End SubHinweis: Im Code ist „CommandButton1“ der Name der Befehlsschaltfläche, mit der Sie das aktuelle Arbeitsblatt als PDF-Datei speichern. „C:\PDF\Export.pdf“ ist der Pfad und Dateiname Ihrer gespeicherten PDF-Datei.
6. Drücken Sie gleichzeitig die Tasten Alt + Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen. Deaktivieren Sie anschließend den Entwurfsmodus unter der Registerkarte Entwickler.
Klicken Sie nun auf die Befehlsschaltfläche – das aktive Arbeitsblatt wird am angegebenen Speicherort als PDF-Datei mit dem Namen „Export“ gespeichert.
Speichern Sie jedes Arbeitsblatt als einzelne PDF-Dateien von Aktuelle Arbeitsmappe mit Kutools für Excel
Hier empfehlen wir das Hilfsprogramm Arbeitsmappe trennen von Kutools für Excel, um mühelos das aktive Arbeitsblatt als PDF-Datei zu speichern. Außerdem können Sie mit diesem Hilfsprogramm jedes Arbeitsblatt in der aktuellen Arbeitsmappe als separate PDF-Dateien speichern.
1. Öffnen Sie die Arbeitsmappe, in der Sie jedes Arbeitsblatt als separate PDF-Datei speichern möchten, und klicken Sie auf KUTOOLS PLUS > Arbeitsmappe > Arbeitsmappe trennen. Siehe Screenshot:
2. Konfigurieren Sie im Dialogfeld Arbeitsmappe trennen Folgendes:
Anschließend wird das ausgewählte Arbeitsblatt sofort als PDF-Datei gespeichert.
Hinweise:
Verwandte Artikel:
- Wie fügt man mithilfe einer Befehlsschaltfläche automatisch eine neue leere Zeile in Excel ein?
- Wie formatiert man eine Zelle in Excel, damit sie wie eine 3D-Schaltfläche aussieht?
- Wie blendet man eine Befehlsschaltfläche in Excel basierend auf einem bestimmten Zellwert ein oder aus?
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 zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins