Unsere Software erzeigt Rechnungen als PDF-A-Dateien und xRechnungen als xml-Dateien. Mit welchem Aufruf kann ich die xml-Datei an die PDF-Datei anhängen und als PDF-A3 Zugferd-kompatibel erzeugen?
Dasselbe Problem habe ich auch. MS Copilot hat mir den untenstehenden Code als Lösung angegeben. Aber da passiert gar nichts 🙁
Drum bin ich hier im Forum gelandet und dachte, da gibt es sicher schon eine Lösung - leider nichts gefunden.
Jemand eine Idee ?? @Stefan Ziegler
Sub XMLInPDFEinbetten()
Dim pdf24Path As String
Dim xmlPath As String
Dim pdfPath As String
Dim command As String
' Pfad zum PDF24-Creator
pdf24Path = "C:\Program Files (x86)\PDF24\PDF24.exe"
' Pfad zur XML-Datei
xmlPath = "C:\Pfad\zur\xmlDatei.xml"
' Pfad zur PDF-Datei
pdfPath = "C:\Pfad\zur\ergebnisDatei.pdf"
' Befehl zum Einbetten der XML-Datei in das PDF
command = pdf24Path & " /embedxml " & xmlPath & " " & pdfPath
' Ausführen des Befehls
Shell command, vbNormalFocus
End Sub