【笔记】MacOS批量将Word文件转换成PDF文件

发表于 2022-08-23 更新于 2024-05-18 阅读次数：

前言

MacOS利用自动操作批量将Word文件转换成PDF文件

编写脚本

打开自动操作.app->选择文稿类型为工作流程->选取

拖拽一个获得指定访达项目模块

拖拽一个运行AppleScript模块

填写代码

on run {input, parameters}
	set theOutput to {}
	tell application "Microsoft Word"
		repeat with thefile in input
			open thefile
			set pdfPath to my makeNewPath(thefile)
			set theActiveDoc to the active document
			save as theActiveDoc file format format PDF file name pdfPath
			close theActiveDoc saving no
		end repeat
	end tell
	return theOutput
end run

on makeNewPath(f)
	set d to f as string
	if d ends with ".docx" then
		return (text 1 thru -5 of d) & "pdf"
	else if d ends with ".doc" then
		return (text 1 thru -4 of d) & "pdf"
	else
		return d & ".pdf"
	end if
end makeNewPath