All,

I am using VBA to search in pdf files for certain words. When found I want to save them in the pdf-document keywords. I have referenced Adobe Acrobat 10 Type Library.
The code I use runs without errors but the keywords are not being saved in the properties of the document.

If sFoundKeys <> "" Then
Dim x As Boolean
sFoundKeys = Right(sFoundKeys, Len(sFoundKeys) - 1)
PDDoc.SetInfo "Keywords", sFoundKeys
x = PDDoc.Save(PDSaveFull, PDFPath)
If x <> True Then
MsgBox "Unable to save " & PDFPath
End If
End If