Solved

Print 1 Powerpoint Slide From Macro

Posted on 2012-03-16
2
853 Views
Last Modified: 2012-06-27
I have a Power Point presentation and I have put a printer image in the lower right corner. The top slide has "Buttons" with hyper links to each slide. I'd like to put a macro behind the printer image so that when the show is running and the user clicks on the image, THAT SLIDE only will print.

Thanks.
0
Comment
Question by:Buck_Beasom
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 23

Accepted Solution

by:
JSRWilson earned 500 total points
ID: 37731125
This macro should do it.

Sub printMe()
Dim lngSld As Long
lngSld = SlideShowWindows(1).View.Slide.SlideIndex
With ActivePresentation.PrintOptions
.Ranges.ClearAll
.RangeType = ppPrintSlideRange
.Ranges.Add Start:=lngSld, End:=lngSld
End With
ActivePresentation.PrintOut
End Sub

Open in new window


Don't be tempted by:
.RangeType=ppPrintCurrent which sounds correct but prints the current slide in EDIT view (not always the same) Also you must clear any old Ranges or they will also print.
0
 

Author Closing Comment

by:Buck_Beasom
ID: 37739714
Outstanding! Thanks.
0

Featured Post

SharePoint Admin?

Enable Your Employees To Focus On The Core With Intuitive Onscreen Guidance That is With You At The Moment of Need.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The System Center Operations Manager 2012, known as SCOM, is a part of the Microsoft system center product that provides the user with infrastructure monitoring and application performance monitoring. SCOM monitors:   Windows or UNIX/LinuxNetwo…
Technology opened people to different means of presenting information, but PowerPoint remains to be above competition. Know why PPT still works today.
The viewer will learn how to simulate a series of sales calls dependent on a single skill level and learn how to simulate a series of sales calls dependent on two skill levels. Simulating Independent Sales Calls: Enter .75 into cell C2 – “skill leve…
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…

728 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question