本文目录一览:
如何实现幻灯片的随机播放
5#
我只给你个算法吧。就不写程序段念乎芦了。下面这仔带个宏实现幻灯片播放的任意转换:Sub
Macro()SlideShowWindows(1).View.GotoSlide
2End
SubGotoSide
2
就是指播放第
2
张幻灯片。如果你想通过点击某个顷做图形实现,就将图形的动作设置为点击鼠标运行这个宏;如果你想无次序的随便播放,则可用随机函数来确定
GotoSide
X的X
。
有没有办法让幻灯片随机播放?
幻灯片不能随机播放源弯,放映的内容都是提前制作好的,有一定的拆缺先旅裂辩后顺序。不过要想调整幻灯片播放的顺序可以进行“自定义幻灯片放映”设置。
ppt 如何实现随机播放
step 1,在第一张幻灯片上插入一个按钮简衡(CommandButton1),双击它进入编程界面
step 2,把庆咐樱以誉丛下的代码拷贝下来复制过去,覆盖
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Dim i, n
Private Sub CommandButton1_Click()
i = 1
Do While i 10
Sleep 1000
n = Int(10 * Rnd + 1)
With SlideShowWindows(1).View
.GotoSlide n
End With
i = i + 1
DoEvents
Loop
End Sub
step 3,播放,看看效果吧