马春杰杰 Exit Reader Mode

macOS下如何批量删除PPT中的备注?

方法来自知乎大佬,我做了简单修改,做个备份,方便使用。

打开自动操作

搜索 AppleScript

运行 AppleScript,在右侧输入代码,然后再右上角选择只在Power Point生效:

on run {input, parameters}
    tell application "Microsoft PowerPoint" -- version: 2019
        set allSlides to slides of active presentation
        set counter to 0
        repeat with each_slide in allSlides
            try
                set content of text range of text frame of place holder 2 of notes page of each_slide to ""
            on error
                set counter to counter + 1
            end try
        end repeat
        if counter > 0 then display dialog "共跳过" & counter & "个无法解析的ppt页" buttons {"OK"} default button 1 with title "清除当前演示文稿中的所有备注" with icon note
    end tell
    return input
end run

最后 control + S 保存为“清除当前演示文稿中的所有备注”。

此时再打开 PowerPoint,并点击顶部菜单栏的「PowerPoint」→「服务/Services」→「清除当前演示文稿中的所有备注」即可:

本文最后更新于2022年12月3日,已超过 1 年没有更新,如果文章内容或图片资源失效,请留言反馈,我们会及时处理,谢谢!