|
| Hat sich erledigt ...
DB führt jetzt bei jedem Start folgende Routine aus:
Sub PDFA_Setzen()
On Error Resume Next
Dim ws As Object
Set ws = CreateObject("WScript.Shell")
ws.RegWrite "HKCU\Software\MicroSoft\Office\14.0\Common\FixedFormat\LastISO19005-1", 1, "REG_DWORD"
If Err.Number <> 0 Then MsgBox "Fehler beim Setzen des Registry-Eintrags für die PDF/A-Kompatibilität!", vbInformation
Set ws = Nothing
End Sub | |
|
PDF/A kompatibles PDF (ISO 19005-1) per VBA erstellen