欢迎来到天天文库
浏览记录
ID：50801370
大小：150.17 KB
页数：4页
时间：2020-03-08
《如何快速删除PPT中的动画.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、如何快速删除PPT中的动画1.单击视图下的宏按钮2.创建一个名为removeALL的宏3.输入以下代码DimIAsInteger:DimJAsIntegerDimoActivePresAsObjectSetoActivePres=ActivePresentationWithoActivePresForI=1To.Slides.CountIfVal(Application.Version)<10ThenForJ=1To.Slides(I).Shapes.Count.Slides(I).Shapes(J).AnimationSettings
2、.Animate=msoFalseNextJElseForJ=.Slides(I).TimeLine.MainSequence.CountTo1Step-1.Slides(I).TimeLine.MainSequence(J).DeleteNextJEndIfNextIEndWithSetoActivePres=Nothing4.关闭窗口，然后再次打开宏，选中刚刚创建的宏，单击运行，任务完成
此文档下载收益归作者所有
