Sub ReverseSlideOrder()
'|||Name:PPT页面逆序|Description:简洁高效的PPT幻灯片页面顺序反转|Vision:2.1.0|||
On Error GoTo ErrorHandler
' 检查是否有打开的演示文档
If Application.Presentations.Count = 0 Then
MsgBox "错误：没有打开的演示文档！请先打开一个PPT文件。", vbExclamation
Exit Sub
End If
登录后可以发表评论
立即登录
暂无评论，来发表第一个评论吧！