手机
当前位置:查字典教程网 >软件教程 >办公软件 >PPT技巧:教你如何批量删除所有动画效果
PPT技巧:教你如何批量删除所有动画效果
摘要:在PPT中添加插入了很多动画效果,想要一个一个删除未免太过麻烦了,我们在这里使用一些代码技巧来批量删除PPT中所有动画,不懂的朋友们一起来学...

在PPT中添加插入了很多动画效果,想要一个一个删除未免太过麻烦了,我们在这里使用一些代码技巧来批量删除PPT中所有动画,不懂的朋友们一起来学学。

通过PPT软件中的VBA来解决了,几乎搜遍了所有的网站,最后终于找到了答案,将代码给各位分享。

代码如下:

Sub removeALL()

Dim I As Integer: Dim J As Integer

Dim oActivePres As Object

Set oActivePres = ActivePresentation

With oActivePres

For I = 1 To .Slides.Count

If Val(Application.Version) < 10 Then

For J = 1 To .Slides(I).Shapes.Count

.Slides(I).Shapes(J).AnimationSettings.Animate = msoFalse

Next J

Else

For J = .Slides(I).TimeLine.MainSequence.Count To 1 Step -1

.Slides(I).TimeLine.MainSequence(J).Delete

Next J

End If

Next I

End With

Set oActivePres = Nothing

End Sub

另附方法二:

在PPT放映设置时把PPT设为“播放时不带动画”就可以达到同样效果。

以上就是批量删除所有PPT动画效果的两种方法,大家可根据自己的习惯来使用,希望这篇教程对大家有帮助。

【PPT技巧:教你如何批量删除所有动画效果】相关文章:

如何压缩PPT图片手把手教你体积减少一半

如何删除Word2007/2010文档中的线条

如何在word文本框文字环绕效果

批量删除Powerpoint文件中生成的动画效果的方法

Excel中的数据如何按日期顺序排列的方法

在Word2007中如何使用或消除智能指针编程功能

如何给Word2010删除和重命名自定义图表模板

如何把Excel单元格设置成凹凸有致的效果

Word中因分节符导致的空白页如何删除

四个使用小技巧让你制作Excel表格时更轻松

精品推荐
分类导航