Print current slide launched from another PPT

[kimkom]

Hi,

I've been using the following code from these forums to print the current
slide in a presentation:

Sub prnt()
ActivePresentation.PrintOptions.RangeType = ppPrintCurrent
ActivePresentation.PrintOut
End Sub

Works a treat, but the trouble is that when I launch the same PPT from
another presentation the wrong slide is printed. Anyone any ideas why it is
doing this and how to fix it?

Many thanks for any help,
Mike

 

[John Wilson]

Hi

That looks like code I wrote here a couple of years ago? If so it is flawed
as it refers back to the current slide in design view which is not
necessarily the current show position.

You need to reference the current show position and set that as the
printrange.

Shyam has example code here

http://skp.mvps.org/ppt00040.htm#6
--
-------------------------------------------
Amazing PPT Hints, Tips and Tutorials

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

 

[kimkom]

Hi John,

That is indeed your own code, I will try amending and let you know how it
goes.

Thanks,
Mike

 

[kimkom]

Thank you John, and thank you Shyam. Lovely stuff, that now works a treat.

Mike
--

 

[kimkom]

Hi again,

Just a quick question about Shyam's print current slide code. Is there any
reason it wouldn't work with PP 2003? The version I'm using is 2007, but
having tried it with another version of 2003 it doesn't seem to work?

Many thanks,
Mike