Как программно удалить метаданные из файлов MS Office? - PullRequest
0 голосов
/ 18 октября 2010

С чего бы мне начать?Я сомневаюсь, что форматы сохраненных файлов опубликованы ... или ... MS не перешла на XML?Или вы все еще можете сохранять проприетарные вещи MS?

Было бы проще реализовать отдельную программу или каким-то образом интегрировать ее с MS Office?

Мне просто любопытно.В поисках нового хобби-проекта, но я думаю, что он может оказаться больше, чем я себе представляю.

Итак, как и с чего начать?Спасибо

1 Ответ

1 голос
/ 19 октября 2010

В более новых программах, таких как Word 2007/2010, вы можете использовать MsoDocInspectorStatus для удаления метаданных с помощью DocumentInspectors.Fix.

Например, заметки докладчика в PowerPointDocumentInspectors(4).

Sub RemoveSpeakerNotes()
    Dim status As MsoDocInspectorStatus
    Dim results As String
    ActivePresentation.DocumentInspectors(4).Fix status, results
End Sub
...