Um zwei PDF-Dateien mittels VBA zusammenzuführen, benötigst Du eine Software, die über eine API oder Befehlszeilenreferenz verfügt, wie beispielsweise Adobe Acrobat. Hier sind die Schritte:
VBA-Umgebung öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.
Neues Modul erstellen: Klicke mit der rechten Maustaste auf "VBAProject (deineDatei.xlsx)" und wähle Einfügen > Modul.
Code einfügen: Füge den folgenden Code in das neue Modul ein:
Sub PDFsZusammenfuegen()
Dim PDF1 As String
Dim PDF2 As String
Dim OutputPDF As String
PDF1 = "C:\Pfad\zu\deiner\erstesPDF.pdf"
PDF2 = "C:\Pfad\zu\deiner\zweitesPDF.pdf"
OutputPDF = "C:\Pfad\zu\deinem\OutputPDF.pdf"
' Beispiel für Adobe Acrobat
Dim AcroApp As Object
Dim AcroPDDoc1 As Object
Dim AcroPDDoc2 As Object
Set AcroApp = CreateObject("AcroExch.App")
Set AcroPDDoc1 = CreateObject("AcroExch.PDDoc")
Set AcroPDDoc2 = CreateObject("AcroExch.PDDoc")
If AcroPDDoc1.Open(PDF1) Then
If AcroPDDoc2.Open(PDF2) Then
AcroPDDoc1.InsertPages AcroPDDoc1.GetNumPages - 1, AcroPDDoc2, 0, AcroPDDoc2.GetNumPages, 0
AcroPDDoc1.Save 1, OutputPDF
AcroPDDoc1.Close
AcroPDDoc2.Close
End If
End If
AcroApp.Exit
End SubPfad anpassen: Ersetze die Platzhalter-Pfade durch die tatsächlichen Pfade Deiner PDF-Dateien.
Makro ausführen: Drücke F5, um das Makro auszuführen.
Fehler: "Konnte PDF nicht öffnen"
Fehler: "Adobe Acrobat nicht installiert"
Fehler: "Zugriffsverletzung"
Wenn Du kein VBA verwenden möchtest, gibt es auch andere Möglichkeiten, um PDF-Dateien zusammenzuführen:
1. Wie kann ich 2 PDFs zusammenfügen ohne Adobe?
Du kannst Online-Tools oder alternative Software wie PDFtk verwenden, um PDF-Dateien ohne Adobe zusammenzuführen.
2. Was ist der beste Weg, zwei PDF-Dateien zu verbinden?
Der beste Weg hängt von Deinen Bedürfnissen ab. Für einfache Aufgaben sind Online-Tools praktisch, während Adobe Acrobat für umfassendere Anforderungen besser geeignet ist.