PowerPoint VBA教程:StopAfterSlides属性

返回或设置在媒体剪辑播放完毕前要放映的幻灯片数。可读写。Long 类型。

说明

要使 StopAfterSlides属性设置起作用,指定幻灯片的PauseAnimation属性必须设为 False,并且PlayOnEntry属性必须设为 True。

当显示指定的幻灯片数或播放完剪辑(无论哪种情况先发生)时,都将停止播放该多媒体剪辑。0(零)值指定了放映完当前幻灯片后停止播放剪辑。

VBA示例

本例指定自动播放当前演示文稿第一张幻灯片第三个形状代表的动态多媒体剪辑,并在后台播放该多媒体剪辑的同时继续放映幻灯片,而且当放映完三张幻灯片或该剪辑播放结束(无论哪种情况先发生)时,将停止播放该多媒体剪辑。第三个形状必须是声音或影片对象。


Set OLEobj = ActivePresentation.Slides(1).Shapes(3)
With OLEobj.AnimationSettings.PlaySettings
    .PlayOnEntry = True
    .PauseAnimation = False
    .StopAfterSlides = 3
End With

上页:PowerPoint VBA教程:State属性 下页:PowerPoint VBA教程:Style属性

PowerPoint VBA教程:StopAfterSlides属性

PowerPoint VBA教程:Style属性 PowerPoint VBA教程:SubAddress属性
PowerPoint VBA教程:Subscript属性 PowerPoint VBA教程:Superscript属性
PowerPoint VBA教程:Table属性 PowerPoint VBA教程:TableDirection属性
PowerPoint VBA教程:TabStops属性 PowerPoint VBA教程:Tags属性
PowerPoint VBA教程:TargetBrowser属性 PowerPoint VBA教程:TemplateName属性
PowerPoint VBA教程:Text属性 PowerPoint VBA教程:TextDirection属性
PowerPoint VBA教程:TextEffect属性 PowerPoint VBA教程:TextFrame属性
PowerPoint VBA教程:TextLevelEffect属性 PowerPoint VBA教程:TextRange属性
PowerPoint VBA教程:TextRangeLength属性 PowerPoint VBA教程:TextRangeStart属性
PowerPoint VBA教程:TextShape属性 PowerPoint VBA教程:TextStyles属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号