Message de Alexandro Colorado date 2007-10-26 23:15 :
Hi is there any way that there could be an infinite presentation loop. I
tried to do a forward on the last slide but I had no luck.
You can set this in menu Slide Show Slide Show settings Type:Auto
In Basic
oDoc.Presentation.IsEndless =
Message de Bernard Marcelly date 2007-10-27 09:54 :
*Correction* for Pause parameter
In Basic
oDoc.Presentation.IsEndless = True
oDoc.Presentation.Pause = 5 ' pause at end of each run (seconds)
__
Bernard
-
To
Hi is there any way that there could be an infinite presentation loop. I
tried to do a forward on the last slide but I had no luck.
I used the following code:
Sub SwitchSlide
Dim oDoc
Dim oController
oDoc = ThisComponent
oController = oDoc.getCurrentcontroller()