Wie verwendet man eine Befehlsschaltfläche, um das aktive Arbeitsblatt als PDF-Datei in Excel zu speichern?
Beim Arbeiten in Microsoft Excel können Sie auf das Problem stoßen, das aktive Arbeitsblatt als PDF-Datei zu speichern. In diesem Artikel erfahren Sie, wie Sie das aktive Arbeitsblatt mit VBA-Code über eine Befehlsschaltfläche als PDF-Datei speichern können. Wenn Sie außerdem einen Bereich oder jedes Arbeitsblatt in der aktiven Arbeitsmappe als einzelne PDF-Datei speichern möchten, kann Ihnen dieser Artikel ebenfalls helfen.
Verwenden Sie die Befehlsschaltfläche, um das aktive Arbeitsblatt mit VBA-Code als PDF-Datei zu speichern.
Speichern Sie ganz einfach das aktive oder jedes Arbeitsblatt als einzelne PDF-Datei mit Kutools für Excel.
Verwenden Sie die Befehlsschaltfläche, um das aktive Arbeitsblatt mit VBA-Code als PDF-Datei zu speichern.
Sie können den folgenden VBA-Code ausführen, um ein aktives Arbeitsblatt durch Klicken auf eine Befehlsschaltfläche als PDF-Datei zu speichern. Gehen Sie bitte wie folgt vor.
1. Zuerst müssen Sie einen Ordner namens PDF erstellen, um Ihre neu konvertierte PDF-Datei zu speichern. Hier erstelle ich diesen Ordner auf meiner lokalen Festplatte (C:).
2. Bitte 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 Befehlsschaltfläche und klicken Sie im Kontextmenü auf Eigenschaften.
3. Geben Sie im Dialogfeld Eigenschaften den anzuzeigenden Text der Befehlsschaltfläche in das Feld Beschriftung unter dem Register Kategorisiert ein, und schließen Sie dann das Dialogfeld.
Sie sehen, dass der angezeigte Text der Befehlsschaltfläche wie im folgenden Screenshot geändert wurde.
4. Klicken Sie erneut mit der rechten Maustaste auf die Befehlsschaltfläche und klicken Sie im Kontextmenü auf Code anzeigen.
5. Im sich öffnenden Fenster Microsoft Visual Basic for Applications ersetzen Sie bitte den ursprünglichen Code im Codefenster 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 Sub
Hinweis: Im Code ist CommandButton1 der Name der Befehlsschaltfläche, die Sie verwenden werden, um das aktive Blatt als PDF-Datei zu speichern. "C:\PDF\Export.pdf" ist der Pfad und der Name Ihrer zu speichernden PDF-Datei.
6. Drücken Sie gleichzeitig die Tasten Alt + Q, um das Fenster Microsoft Visual Basic for Applications zu schließen. Schalten Sie dann den Entwurfsmodus unter der Registerkarte Entwickler aus.
Wenn Sie nun auf die Befehlsschaltfläche klicken, wird das aktive Arbeitsblatt als PDF-Datei mit dem Namen Export gespeichert und befindet sich am angegebenen Ort.
Speichern Sie jedes Arbeitsblatt als individuelle PDF-Datei der aktiven Arbeitsmappe mit Kutools für Excel.
Hier empfehlen wir das Hilfsprogramm „ Arbeitsmappe teilen“ von Kutools für Excel, um das aktive Arbeitsblatt ganz einfach als PDF-Datei zu speichern. Außerdem können Sie mit diesem Hilfsprogramm auch jedes Arbeitsblatt in der aktuellen Arbeitsmappe als individuelle PDF-Datei speichern.
1. Wählen Sie in der Arbeitsmappe, in der Sie jedes Arbeitsblatt als individuelle PDF-Datei speichern möchten, Kutools Plus > Arbeitsmappe > Arbeitsmappe teilen. Siehe Screenshot:
2. Konfigurieren Sie im Dialogfeld „Arbeitsmappe teilen“ bitte wie folgt:
Dann wird das ausgewählte Arbeitsblatt sofort als PDF-Datei gespeichert.
Hinweise:
Verwandte Artikel:
- Wie fügt man automatisch eine leere neue Zeile mit einer Befehlsschaltfläche in Excel ein?
- Wie formatiert man eine Zelle so, dass sie wie eine 3D-Schaltfläche aussieht in Excel?
- Wie blendet man eine Befehlsschaltfläche basierend auf einem bestimmten Zellenwert in Excel ein oder aus?
Beste Büroproduktivitätswerkzeuge
Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 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 Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!