Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Print 1 Powerpoint Slide From Macro

Posted on 2012-03-16
2
Medium Priority
?
867 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
2 Comments
 
LVL 23

Accepted Solution

by:
JSRWilson earned 2000 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

NFR key for Veeam Backup for Microsoft Office 365

Veeam is happy to provide a free NFR license (for 1 year, up to 10 users). This license allows for the non‑production use of Veeam Backup for Microsoft Office 365 in your home lab without any feature limitations.

Question has a verified solution.

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

Many companies are making the switch from Microsoft to Google Apps (https://www.google.com/work/apps/business/). Use this article to learn more about what Google Apps has to offer and to help if you’re planning on migrating to Google Apps. It is …
Having trouble getting your hands on Dynamics 365 Field Service or Project Service trial? Worry No More!!!
The viewer will learn how to simulate a series of coin tosses with the rand() function and learn how to make these “tosses” depend on a predetermined probability. Flipping Coins in Excel: Enter =RAND() into cell A2: Recalculate the random variable…
The view will learn how to download and install SIMTOOLS and FORMLIST into Excel, how to use SIMTOOLS to generate a Monte Carlo simulation of 30 sales calls, and how to calculate the conditional probability based on the results of the Monte Carlo …

885 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