2017-07-27 20 views

答えて

2

フェイルセーフではありません(ファイルの存在チェックなどを追加できます)。 .batとして保存:

@if (@X)==(@Y) @end /* JScript comment 
    @echo off 

    cscript //E:JScript //nologo "%~f0" %* 

    exit /b %errorlevel% 

@if (@X)==(@Y) @end JScript comment */ 

var source=WScript.Arguments.Item(0); 
var target=WScript.Arguments.Item(1); 
PP = new ActiveXObject("PowerPoint.Application"); 
PRSNT = PP.presentations.Open(source,0,0,0) 
//PRSNT.SaveCopyAs(target,32); 
//https://msdn.microsoft.com/en-us/vba/powerpoint-vba/articles/ppsaveasfiletype-enumeration-powerpoint 
PRSNT.SaveAs(target,32); 
PRSNT.Close(); 
PP.Quit(); 

第一引数が第二は、あなたがそれを保存する新しいファイルであるPowerPointファイルです。 (前のスクリプトがppt2pdf.batとして保存している場合)presentation object

についての詳細情報は、次のステップは、ファイルを処理することです:

@echo off 
::change the locataion in the line bellow 
set "ppt_dir=c:\ppts" 
for %%a in ("%ppt_dir%\*pptx" "%ppt_dir%\*ppt") do (
    call ppt2pdf.bat "%%~fa" "%%~dpna.pdf" 
) 
関連する問題