是否可以使用Windows命令行将文件夹中的多个PowerPoint文件转换为PDF?
答案 0 :(得分:4)
它没有安全失败(您可以添加文件存在检查等)。将其另存为.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文件,第二个参数是要保存它的新文件。有关presentation object
的更多信息下一步是处理文件(如果以前的脚本保存为ppt2pdf.bat
):
@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"
)