Page Down or Page Up VBA

[Rob]

Is their any VBA for paging down or paging up through a presentation when you
are in the ppViewNormal screen. I can't find any.

 

[Glen Millar]

Hi,,

Application.ActiveWindow.LargeScroll Down:=1

and

Application.ActiveWindow.LargeScroll Up:=1


--

Regards,
Glen Millar
Microsoft PPT MVP

Please tell us your PowerPoint version

Tutorials and PowerPoint animations at
the original www.pptworkbench.com
glen at pptworkbench dot com

 

[Rob]

Thank for this, but this only works if you are displying the full view, is
their any other way of specifying it. ?

 

[Edward]

One way of doing this is using a combination of GotoSlide and SlideIndex
for page down
ActiveWindow.View.GotoSlide ActiveWindow.Selection.SlideRange.SlideIndex + 1
for page up
ActiveWindow.View.GotoSlide ActiveWindow.Selection.SlideRange.SlideIndex - 1

you have to add some code to make sure slide index remains in its proper range

something like

if ActiveWindow.Selection.SlideRange.SlideIndex <
Activepresentation.slides.count then
ActiveWindow.View.GotoSlide ActiveWindow.Selection.SlideRange.SlideIndex - 1
.....
etc ..