[求助]PPt中如何在VBA中引用某张幻灯片的控件对象?

tomlitomli

我想用在PPT中使用VBA的SlideShowNextSlide事件,在幻灯片每次切换至下一张时触发该事件,在里面放代码(红色部分):

Private Sub App_SlideShowNextSlide(ByVal Wn As SlideShowWindow)
Dim Showpos As Integer

   Showpos = Wn.View.CurrentShowPosition

if showpos=10 then

slides(10).ShockwaveFlash1.rewind

endif
End Sub
这代码是实现第十张幻灯片的一个flash控件,使其包含的动画复位至开始播放处。

问题是这样引用这一flash控件是错误的，我不知如何表示flash控件对象，请各位坛友帮助，谢谢！！

[此贴子已经被作者于2007-9-21 20:26:03编辑过]

tomlitomli

已解决.

原来的slides(10).ShockwaveFlash1.rewind

变成slides10.ShockwaveFlash1.rewind

去掉括号即可.

[此贴子已经被作者于2007-9-25 22:17:27编辑过]