Getting Save and Print Option during Slide Show

J

John Wilson

You will I think need to use vba to do this.

Do you want to just save / print the presentation or actually view the save
as / print dialogue boxes to eg alter filenames or options?
 
J

John Wilson

As Steve is (probably) suggesting you can expose the print dialogue in the
viewer by right click > print.

This vba (from microsoft help) will print out 1,3,4,5,8,9 slides
With ActivePresentation.PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add 1, 1
.Add 3, 5
.Add 8, 9
End With
End With
ActivePresentation.PrintOut

In the full program this vba might work to expose the dialogues

Sub printmenu()
Application.CommandBars("Menu Bar").FindControl(Id:=4, _
Recursive:=True).Execute
Application.WindowState = 2
End Sub

Sub saveasmenu()
Application.CommandBars("Menu Bar").FindControl(Id:=748, _
Recursive:=True).Execute
Application.WindowState = 2
End Sub

Amazing PPT Hints, Tips and Tutorials-
http://www.PPTAlchemy.co.uk
http://www.technologytrish.co.uk/ppttipshome.html
email john AT technologytrish.co.uk
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top