PowerPoint 2007 SP2, ExportAsFixedFormat в PowerShell? - PullRequest
Новая
       28

PowerPoint 2007 SP2, ExportAsFixedFormat в PowerShell?

1 голос
/ 21 мая 2009

Вчера я пытался пакетно преобразовать группу PPT в PDF для друга, и я решил взглянуть на PowerShell, так как он некоторое время сидел на моем HD.

Вот код, который я придумал. 

$p = new-object -comobject powerpoint.application

# I actually don't know why I have to set the window to visible, 
# but it doesn't work otherwise, anyway, it's not the real problem I have
$p.visible = 1 

$f = $p.presentations.open('\some\file.ppt')

$f.ExportAsFixedFormat('\some\newfile.pdf', 2)

2 для PDF

Поскольку метод "грубой силы" не работал ("несоответствие типов"), я попытался импортировать тип enum с помощью 

$pptypepdf= [Microsoft.Office.Interop.PowerPoint.PpFixedFormatType]::PpFixedFormatTypePDF
$f.ExportAsFixedFormat('\some\newfile.pdf', $pptypepdf)

Странно то, что он по-прежнему выдает ошибку «несоответствие типов» ...

Кроме того, SaveAs отлично работает с 

$f.SaveAs('\some\newfile.pdf', 32) # 32 is for PDF

Что я делаю не так?

Обновление

Соответствующая документация:

Вот полное сообщение об ошибке 

$pptypepdf= [Microsoft.Office.Interop.PowerPoint.PpFixedFormatType]::PpFixedFormatTypePDF
$f.ExportAsFixedFormat($filepath, $pptypepdf)

Exception calling "ExportAsFixedFormat" with "2" argument(s): "Type mismatch. (Exception from HRESULT: 0x80020005 (DISP_E_TYPEMISMATCH))"

At line:1 char:23
+ $f.ExportAsFixedFormat <<<< ($filepath, $pptypepdf)
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : ComMethodTargetInvocation

1 Ответ

1 голос
/ 07 октября 2015

Я сталкивался с той же проблемой в Python. Попробуйте указать PrintRange аргумент, как сказано в решении Штефаном Шукатом:

Это ошибка в Powerpoint. Он определяет "[в, необязательно, defaultvalue (0)] PrintRange * PrintRange ", что приводит к генерации "PrintRange = 0" в оболочке Python. Поэтому вы получите ошибка при вызове метода. Так что никаких проблем с makepy. Временное решение вызовите метод с PrintRange = None, поскольку None является COM-объектом вали. Например. presentation.ExportAsFixedFormat (pptFile + 'PDF', win32com.client.constants.ppFixedFormatTypePDF, win32com.client.constants.ppFixedFormatIntentScreen, PrintRange = Нет) должно работать.

Источник: несоответствие типов при использовании функции экспорта PowerPoint 2007

Я совсем не знаю PowerShell, но разработал рабочий пример: 

$p.ActivePresentation.PrintOptions.Ranges.Add(1,1)
$r = $p.ActivePresentation.PrintOptions.Ranges.Item(1)
$document.ExportAsFixedFormat('D:\\ps.pdf', 2, 1, 0, 1, 1, 0, $r)

Это не полное решение, но экспорт завершен. Это как-то экспортирует полную презентацию, а не только слайд нет. 1, как я и думал. Постскриптум Ой. Вот то же решение

...