PDA

View Full Version : go to next slide automatically



rajagopal
10-03-2007, 04:45 AM
Hi,
I'm running a power point show.
I'm at slide #35. A mouse pointer like "Hand symbol" is available which is hyperlinked to next slide #36 upon clicking it.
Now, I'm at slide #36. A "Hand symbol" like mouse pointer is available which is hyperlinked to next slide #37 upon clicking it.
Similarly # 37 has hand symbol, hyperlinked to #38 upon clicking it.
The above 3 operations have to be executed by calling a macro automatically when the slide #35 is being activated.

please help

John Wilson
10-04-2007, 08:24 AM
Hi

Ive read it a couple of times but I still struggle to understand what you want to do. Maybe you could have another go at explaining?

rajagopal
10-04-2007, 08:34 PM
Hi,
Please find the attached ppt where i gave further explanation of what i want..
Revert if it still confuse you..

John Wilson
10-06-2007, 07:28 AM
I'm still not sure I've understood what you need. This code would add a hand to the 3 slides after the one when it is invoked (easily changed0 and give it an action of next slide on click.

Sub hand()
Dim n As Integer
Dim i As Integer
Dim otxt As Shape
'set refn to current slide
n = ActivePresentation.SlideShowWindow.View.CurrentShowPosition
'For next 3 slides
For i = 1 To 3
'add hand
Set otxt = ActivePresentation.Slides(n + i) _
.Shapes.AddTextbox(msoTextOrientationHorizontal, 300, 200, 50, 50)
With otxt.TextFrame.TextRange
.InsertSymbol "Wingdings 2", 74
.Font.Size = 72
'set actions
With .ActionSettings(ppMouseClick)
.Action = ppActionNextSlide
End With
End With
Next
End Sub