Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Pdf mit Makro erstellen

Pdf mit Makro erstellen
11.10.2015 14:38:03
Johannes
Hallo an alle,
Muss vorweg sagen dass ich keine erfahrung mit VBA habe. Möchte aber gerne für meine Rechnungen Makros einbauen.
- Makro für ausgewählte Zellen Drucken und als Pdf in einen bestimmten Ordner abspeichern.
- Der Dateiname sollte sich so zusammensetzen "rechnung_(Zellinhalte aus K10)"
Vielleicht kann mir ja jemand helfen.
Danke im vorraus.
Mfg Johannes

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pdf mit Makro erstellen
11.10.2015 14:51:41
Hajo_Zi
Hallo Johannes,
benutze doch den Makrorecorder der liefert schon brauchbare Ansätze.

AW: Pdf mit Makro erstellen
11.10.2015 20:23:14
Johannes
Danke Hajo,
Habe ich gemacht.
Sub rechnung_print_pdf()
Range("B2:L59").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"J:\Dokumente\Vermietung\Rechnungen\rechnung_.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
Range("B2:L59").PrintPreview
End Sub
Aber wie kann ich die Rechnungsnummer die in der Zelle K10 steht hinter \rechnung_.....pdf schreiben?
Danke

Anzeige
AW: Pdf mit Makro erstellen
11.10.2015 20:38:01
Hajo_Zi
"J:\Dokumente\Vermietung\Rechnungen\rechnung_" & Range("K10") &".pdf", Quality:=
Gruß Hajo

AW: Pdf mit Makro erstellen
11.10.2015 20:56:33
Johannes

Sub rechnung_print_pdf()
Range("B2:L59").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"J:\Dokumente\Vermietung\Rechnungen\rechnung_" & Range("K10") &".pdf", Quality:=
xlQualityStandard , IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
Selection.PrintPreview
End Sub
Bekomm eine Fehlermeldung: Fehler beim Kompilieren: Syntaxfehler
Mfg Johannes

Anzeige
AW: Pdf mit Makro erstellen
11.10.2015 21:43:51
Sepp
Hallo Johannes,
Sub rechnung_print_pdf()
With Selection
  .ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:="J:\Dokumente\Vermietung\Rechnungen\rechnung_" & Range("K10") & ".pdf", _
    Quality:=xlQualityStandard, IncludeDocProperties:=True, _
    IgnorePrintAreas:=True, OpenAfterPublish:=False
  .PrintPreview
End With
End Sub

Gruß Sepp

Anzeige
AW: Pdf mit Makro erstellen
11.10.2015 22:35:32
Johannes
Vielen Dank es klappt!
Mfg Johannes

AW: Pdf mit Makro erstellen
12.10.2015 14:57:27
Fabi
Hallo Sepp,
darf ich fragen, wie Du den Code so schön farbig rein gestellt hast?
Vielen Dank für Dein Feedback im Voraus.
Viele Grüße,
Fabi :-)
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Pdf mit Makro erstellen in Excel


Schritt-für-Schritt-Anleitung

Um ein Excel-Makro zu erstellen, das eine PDF-Datei generiert, folge diesen Schritten:

  1. Makro aktivieren: Stelle sicher, dass die Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen und aktiviere die Makros.

  2. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Neues Modul hinzufügen: Klicke mit der rechten Maustaste auf VBAProject und wähle Einfügen > Modul.

  4. Makro-Code eingeben: Füge folgenden Code ein, um eine PDF-Datei zu erstellen:

    Sub rechnung_print_pdf()
       Dim pdfFileName As String
       pdfFileName = "J:\Dokumente\Vermietung\Rechnungen\rechnung_" & Range("K10").Value & ".pdf"
    
       With Selection
           .ExportAsFixedFormat Type:=xlTypePDF, _
           Filename:=pdfFileName, _
           Quality:=xlQualityStandard, _
           IncludeDocProperties:=True, _
           IgnorePrintAreas:=False, _
           OpenAfterPublish:=False
           .PrintPreview
       End With
    End Sub
  5. Makro ausführen: Schließe den VBA-Editor, wähle die Zellen aus, die du drucken möchtest, und führe das Makro aus, indem du ALT + F8 drückst und das Makro rechnung_print_pdf auswählst.


Häufige Fehler und Lösungen

  • Fehler 1: Syntaxfehler
    Überprüfe, ob du die Anführungszeichen und das & korrekt gesetzt hast. Der Dateiname muss richtig zusammengesetzt werden, wie im Beispiel gezeigt.

  • Fehler 2: Pfad nicht gefunden
    Stelle sicher, dass der angegebene Pfad (J:\Dokumente\Vermietung\Rechnungen\) existiert und du die notwendigen Berechtigungen hast, um dort zu speichern.

  • Fehler 3: Makros nicht aktiviert
    Wenn das Makro nicht funktioniert, überprüfe, ob die Makros in den Excel-Optionen aktiviert sind.


Alternative Methoden

  • Makro-Recorder verwenden: Du kannst den Makro-Recorder nutzen, um einfache Aktionen aufzuzeichnen und diese als VBA-Code zu speichern. Dies ist besonders nützlich, wenn du noch keine Erfahrung mit dem Schreiben von Makros hast.

  • VBA-Funktionen: Anstelle eines Makros kannst du auch VBA-Funktionen verwenden, um die PDF-Erstellung auszulagern und so mehr Kontrolle über den Prozess zu haben.


Praktische Beispiele

Hier ist ein einfaches Beispiel, wie du ein Excel-Makro für PDF erstellen kannst:

Sub Beispiel_PDF_Erstellen()
    Dim pdfDateiname As String
    pdfDateiname = "C:\Users\DeinBenutzername\Documents\Beispiel.pdf"

    Sheets("Tabelle1").ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:=pdfDateiname, Quality:=xlQualityStandard
End Sub

In diesem Beispiel wird die gesamte Tabelle 1 als PDF gespeichert. Du kannst den Code anpassen, um nur bestimmte Bereiche zu drucken.


Tipps für Profis

  • Automatisierung: Wenn du regelmäßig PDFs erstellen musst, kannst du das Makro so anpassen, dass es automatisch bei bestimmten Ereignissen ausgeführt wird, wie z.B. beim Öffnen der Datei.

  • Benutzerdefinierte Dialoge: Verwende VBA, um benutzerdefinierte Eingabedialoge zu erstellen, sodass du die Datei- und Ordnernamen dynamisch anpassen kannst.

  • Fehlerbehandlung: Implementiere eine Fehlerbehandlung in deinem Makro, um unerwartete Fehler zu erkennen und zu melden.


FAQ: Häufige Fragen

1. Wie kann ich ein PDF-Makro erstellen?
Du kannst ein PDF-Makro erstellen, indem du den VBA-Editor in Excel öffnest und den entsprechenden Code zum Exportieren von Daten als PDF schreibst.

2. Welche Excel-Version benötige ich für die PDF-Erstellung mit Makros?
Die PDF-Erstellung mit Makros funktioniert ab Excel 2007 und in allen späteren Versionen.

3. Wie kann ich den PDF-Dateinamen dynamisch anpassen?
Indem du Zellinhalte in deinem VBA-Code verwendest, kannst du den Dateinamen dynamisch gestalten, wie im Beispiel mit Range("K10").Value.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige