ppt2010沉叠效果怎么弄出来啊，我想做翻页效果，但是新版的很多功能都没有了，搞不懂啊
发布网友
发布时间：2022-04-23 18:22
共1个回答
热心网友
时间：2023-10-12 19:20
1、在ppt2007或2003中先做好效果再用2010打开；
2、可以在2010中用VBA添加这些动画。
具体代码、操作步骤如下：
（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
说明：数字“17”，是“伸展”动画的ID。进入和相对应的退出效果为一个ID，只是在添加退出效果时，exit的属性为ture。上述代码同时添加了进入效果和相对应的退出效果，循环中的“0”表false，“1”表true。
其它动画对应ID可参看参考资料
