Printing a Current Slide in Slide Show View

[Matissta]

I'm attempting to create a self running presentation that will be burned to a
CD. I'd like to provide a option to print the current slide only.

Any ideas? Thanks.

 

[David M. Marcovitz]

This can be done quite easily in VBA, but if it is running off the CD using
PowerPoint Viewer, that won't help.
--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.loyola.edu/education/PowerfulPowerPoint/

 

[Matissta]

Do you know specifically what the script should look like? What about a macro?

 

[David M. Marcovitz]

Sorry, I didn't include it earlier. I assumed the autorun would force the
use of the Viewer so the VBA would be a non-starter. Since you're still
interested:

Sub PrintCurSlide()
Dim curSlideNum As Long
curSlideNum = _
ActivePresentation.SlideShowWindow.View.Slide.SlideIndex
ActivePresentation.PrintOptions.OutputType = ppPrintOutputSlides
ActivePresentation.PrintOut From:=curSlideNum, _
To:=curSlideNum
End Sub

--David
--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.loyola.edu/education/PowerfulPowerPoint/