PowerPoint 2010中實現(xiàn)隨機播放的方法
來源:技術(shù)員聯(lián)盟┆發(fā)布時間:2018-10-29 12:05┆點擊:
PowerPoint 2010相比以前版本的PPT無論實在界面和性能上都大大的提高了,但是不幸的是竟然沒有隨機切換效果(隨機播放)的功能了,有時候需要用卻沒辦法實現(xiàn)很讓人糾結(jié)。不過好在我們可以借助VBS腳本(宏)實現(xiàn)這個功能。
首先把PPT都做好,然后打開選項,自定義功能區(qū),把開發(fā)工具勾上。
然后在開發(fā)工具選項卡中選“宏”,新建一個,把下面的代碼貼進去:
Sub RandEffect()
For i = 1 To ActivePresentation.Slides.Count
With ActivePresentation.Slides(i).SlideShowTransition
.AdvanceOnTime = msoTrue '也可以選擇定時切換
.AdvanceTime = 0 '定時時長為0秒
.EntryEffect = ppEffectRandom
.Duration = 1.5 '切換時長1.5秒
End With
Next
End Sub
保存成pptm格式,然后運行點宏,選 RandEffect,運行。
OK,全部的幻燈片都隨機播放了,不過缺陷是只能隨機到很基礎(chǔ)的特效,很高端的那種還不行。