在PPT2010中设置幻灯片的随机切换

blossom

在最新的PowerPoint 2010版本中，增加了许多令人眼花缭乱并且惊叹不已的幻灯片切换效果，然而细心的用户可以发现，其中原有版本中所包含的“随机切换效果”的选项现在消失了，也就是说用户必须为各页幻灯片指定一个固定的切换方式，而不能使用各页随机出现不同的切换方式。





在PPT2010中设置幻灯片的随机切换

这不得不说是2010版本的一个比较大的遗憾，但幸好我们还有VBA，可以弥补这个遗憾，可以使用以下代码设置各页幻灯片使用随机的切换方式：

————————————————————————————

Sub RandEffect()
For i = 1 To ActivePresentation.Slides.Count
With ActivePresentation.Slides(i).SlideShowTransition
.AdvanceOnClick = msoTrue '单击鼠标后切换
'.AdvanceOnTime = msoTrue '也可以选择定时切换
'.AdvanceTime = 5 '定时时长为5秒
.EntryEffect = ppEffectRandom
.Duration = 1.5 '切换时长1.5秒
End With
Next
End Sub
————————————————————————————

稍稍令人遗憾的是，以上代码所能提供的随机效果仅仅是“细微型”中的这些切换效果，而那些更炫目的“华丽型”和“动态内容”切换效果并未出现在随机的结果中。如何才能让这个随机切换功能更完美，我还需要更多时间来深入研究。

点击左侧的目录栏->右键->投影片切换，这时右面会出现动画选项，选择最后一项“随机切换”再选择“套用至所有投影”片就OK了

user_kxmxw

支持一下吧

chunyang_hu

我率天兵天将 将你打回原形~~~

user_lyoeh

帮你顶，人还是厚道点好

user_ubckrued

有空一起交流一下

user_stbhg

这个贴不错！！！！！

dabiao2008

我的妈呀，爱死你了

dfgfhfdh

又看了一次

cbkfun

不错不错.,..我喜欢

2020-mark

我想要`~