'|||Name:批量清除PPT备注|Description:批量清除当前PPT演示文稿中所有幻灯片的备注内容，支持全选和选定模式|Vision:1.0.2|||
Sub ClearAllNotesInPresentation()
'功能：批量清除当前PPT演示文稿中所有幻灯片的备注
'我是个新手，请给我完整的方法代码，并给代码添加对应的报错调试信息，显示到弹窗，方便我调试；
'----------【批量清除PPT备注功能】----------；
On Error GoTo ErrorHandler
Dim pptPresentation As Presentation
Dim sldSlide As Slide
登录后可以发表评论
立即登录
暂无评论，来发表第一个评论吧！