用了PowerPoint 2010，大家都惊讶地发现，2003、2007中的层叠、伸展等一些动画效果不见了。但用2003或2007添加这些效果再在2010中打开时，这些效果仍然显示。那么到底去哪了?其实只是隐藏起来罢了，接下来小编举例简单的例子告诉大家ppt2010添加层叠效果的方法，欢迎大家来到学习。

ppt2010添加层叠效果的方法

具体代码、操作步骤及相关问题：

1.按ALT+F11，打开VBA编辑器，插入“模块”;

2.复制下列代码：

Sub Add_Effect()

Set shp = ActiveWindow.Selection.ShapeRange(1)

For i = 0 To 1

With ActivePresentation.Slides(1).TimeLine _

.MainSequence.AddEffect(Shape:=shp, effectid:=17)

.Exit = i

End With

Next

End Sub

3.选中要添加的图片或形状，按ALT+F8 ，运行 Add_Effect

4.关键代码：注意数字“17”，是“伸展”动画的ID。进入和相对应的退出效果为一个ID，只是在添加

退出效果时，exit的属性为ture。上述代码同时添加了进入效果和相对应的退出效果，循环中的“0”表

false，“1”表true。

5.如何知道动画ID?运行本实例所附的show_effect代码，便可知道添加动画效果的ID。

猜你感兴趣：

1.ppt2010怎么添加层叠效果

2.ppt2010怎么添加层叠效果图文教程

3.ppt如何动画叠加效果图文教程

4.ppt2010怎么给动画添加随机效果

5.ppt2010如何添加动画切换效果