Извлечение встроенного PDF из презентации PowerPoint с использованием VBA или VSTO

Question

Мне нужно извлечь вложенные (без ссылок) pdf-документы в файле PowerPoint. Я могу извлечь встроенные файлы из Excel с помощью ActiveSheet.OLEObjects и проверить ProgID. Затем я копирую его в буфер обмена и сохраняю как описано here Но по какой-то причине я не смог найти эквивалент Excel.OleObject в PowerPoint. Самое близкое, что я думаю, это свойство shape.OLEFormat.Object, но оно не поддерживает метод копирования. Я проверил this, но если это возможно, мне нужно решение VBA.

Answer 1

я случайно заметил, что копирование самой формы PowerPoint делает работу.

Answer 2

Что вам нужно сделать, это открыть встроенный PDF с помощью DoVerb:

ActivePresentation.Slides(1).Shapes(1).OLEFormat.DoVerb 

идущего от там вы в зависимости от установленного программного обеспечения, либо сохранить файл, используя SendKeys адреса или при наличии АНИ на Adobe Reader ,

Для полного обсуждения этого читать нить на форумах MSDN здесь: https://social.msdn.microsoft.com/Forums/en-US/235dde1a-13bb-4f07-8eb4-04ef1121a747/export-a-pdf-file-from-powerpoint-with-vba?forum=officegeneral