Help! Trying to print a slide from a PPS using VBA

M

Moondawg00

OK, I've beat myself enough over this. Time to ask the experts!

I have a 22 slide Powerpoint Show that I plan to distribute within my
organization. Actually it's 21 slides and a Certificate of Completion. I
believe I've done my due diligence, investigating every method of printing
the certificate I could find on the internet.

I'm using Powerpoint 2003.

I've added a macro with the following VBA that I found in a newsgroup
posting. It works...almost.

Sub printit()
With ActivePresentation.PrintOptions
..OutputType = ppPrintOutputSlides
..RangeType = ppPrintCurrent
End With
ActivePresentation.PrintOut
End Sub

It works for me most of the time, but occasionally it prints the previous
slide. I've also found out (the hard way, I thought it worked and sent it
out) that it doesn't work for anyone else. I checked to ensure they all had
their macro security set to medium or low. They do. They also have a
designated "Default" printer. I've sent it as a PPS and a PPT file. No
difference. I've tried to open it from an email and after saving it to the
hard drive. No change. The only computer it works on at all is mine, and
then only part time.

I found this piece of code hoping I could specify the slide to print and at
least cure part of the problem.

ActivePresentation.PrintOut From:=22, To:=22

Unfortunately, when I use it, nothing happens.

Lastly, and I don't know if it means anything or not, the macro always seems
to be called "slide(19)", no matter what slide I'm on when I make it.
I have no clue what it means, but I'm sure you can tell that already.

I'm not a Powerpoint novice but my VBA skill level could best be described
as "dangerous." As in just enough knowledge to be dangerous.

Any and all help would be greatly appreciated!

Thanks,
Bruce Moon
 
J

John Wilson

"Lastly, and I don't know if it means anything or not, the macro always seems
to be called slide(19)"

I'm a little confused by this bit Bruce

Rather than ask you lots of questions maybe you could email it to me and
I'll see if I can spot anything
--
-------------------------------------------
Amazing PPT Hints, Tips and Tutorials

http://www.PPTAlchemy.co.uk
http://www.technologytrish.co.uk
email john AT technologytrish.co.uk
 
S

Shyam Pillai

Take a look at this example.
Print current slide in the slideshow: http://skp.mvps.org/ppt00040.htm#6
.OutputType = ppPrintOutputSlides
.RangeType = ppPrintCurrent
End With
ActivePresentation.PrintOut
End Sub

It works for me most of the time, but occasionally it prints the previous
slide.


ppPrintCurrent applies to the current slide in the design mode. If it is a
pps file which is in slideshow mode that won't even apply and so other users
are experiencing issues printing.

Regards,
Shyam Pillai

Image Importer Wizard
http://skp.mvps.org/iiw.htm
 

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