How to create a Print Macro that selects a printer

[Barb]

I've created a command button to print a one page
presentation that will be distributed in slideshow .pps
format.

Using "ActivePresentation.PrintOut" works well, however
it only prints to the active printer.

I'm looking for any code that would instead call up the
Print dialog box so the user can select the printer they
desire (some may want to print to a color printer, others
black and white).

Any ideas?

 

[Brian Reilly, MS MVP]

Sub printout()
'Fires Print dialog to choose the printer
'Works in SlideShow view as well
CommandBars("File").Controls("Print...").Execute
End Sub

This opens the Normal View and the Print dialog. After printing just
minimize this view and Slide Show is still running.

Brian Reilly, PowerPoint MVP