eigenschaften mitgabe an pdf mittel acrobat librar
Betrifft: eigenschaften mitgabe an pdf mittel acrobat librar
von: ela
Geschrieben am: 28.07.2014 16:42:30
Hallo,
ich habe folgendes Problem.
Und zwar möchte ich mit folgendem Code, pdfs öffnen und ihnen eignschaften /attribute mitgeben.
' SET ADOBE ACROBAT OBJECTS
Set AcroApp = CreateObject("AcroExch.App")
Set AVDoc = CreateObject("AcroExch.AVDoc")
Call AVDoc.Open(sSourcePath & "\" & sResourceID, "")
Set AVDoc = AcroApp.GetActiveDoc
Set PDDoc = AVDoc.GetPDDoc
' SET DOCUMENT PROPERTIES
PDDoc.SetInfo "Property Name", "Values Saved"
oder folgender ähnlicher Code
Dim objApp As AcroApp
Dim objAcroAVDoc As New AcroAVDoc
Dim objAcroPDDoc As AcroPDDoc
Set objApp = CreateObject("AcroExch.Application")
objAcroAVDoc.Open "U:\Test 2.Praxisphase\Quellordner\Test.pdf", ""
Set objAcroPDDoc = objAcroAVDoc.GetPDDoc
' Gibt den Namen des PDF's aus
MsgBox objAcroPDDoc.GetFileName
die Adobe Acrobta 9.0 Type Libaray habe ich eingebunden.
Trotzdem bekomme ich immer eine Fehlermeldung "429" "Objekterstellung durch Active-X-Komponente nihct möglich".
Ich benutze Office 2010.
Wie kann ich den Code abändern, damit ich keine fhelermedlung mehr erhalte?
Für Hilfe wäre ich sehr dankbar.
Viele Grüße
ELa
  |
Betrifft: doppelt: owT.
von: mumpel
Geschrieben am: 28.07.2014 20:08:03
Betrifft: AW: doppelt: owT.
von: ela
Geschrieben am: 29.07.2014 11:21:24
Hallo,
was wolltest du schreiben?
Ich sehe nur einen weißen beitrag
Betrifft: AW: doppelt: owT.
von: mumpel
Geschrieben am: 29.07.2014 12:30:13
Das es doppelt ist. Du hast zwei Beiträge zur selben Frage eröffnet. Einmal reicht aber. owT = "ohne weiteren Text".
Beiträge aus den Excel-Beispielen zum Thema "eigenschaften mitgabe an pdf mittel acrobat librar"
Screenshot zu MsgBox