Print Hyperlinked Slideshow Without Hidden Slides

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Greetings.

Ocassionally I need to print out a slideshow that consists of one main
slides without about 8-10 hyperlinks to other slide presentations.
These hyperlinked presentations contain a lot of hidden slides that
I don't need to print.

Does anybody know of a way to quickly print out this type of slide
show or can point me to a script or macro that I could execute to
do this?

Regards,

Charles
 
John:

Unfortunately, the hyperlinked slides are spread out over
several folders. Not only that, but these folders frequently
contain other *.ppt files that don't pertain to my slideshow.

This is the reason that I'm interested in some method or
script for printing those slides hyperlinked to the main slide.

Any other ideas?

Regards,

Charles
 
mAYBE SOMETHING LIKE THIS THEN:

Sub printhyperlinks()
Dim sFileName As String
Dim oSl As Slide
Dim oHl As Hyperlink

For Each oSl In ActivePresentation.Slides
For Each oHl In oSl.Hyperlinks
sFileName = Dir$(oHl.Address)

While sFileName <> ""
Set oPres = Presentations.Open(oHl.Address, msoFalse)
With oPres
..PrintOptions.PrintHiddenSlides = msoFalse
..PrintOut
End With
oPres.Close
Set oPres = Nothing
sFileName = Dir()
Wend

Next
Next

End Sub
--

Did that answer the question / help?
_____________________________
John Wilson
Microsoft Certified Office Specialist
http://www.technologytrish.co.uk/ppttipshome.html
 
Or even this (CAPS lock under control now!)

Sub printhyperlinks()

Dim oSl As Slide
Dim oHl As Hyperlink
For Each oSl In ActivePresentation.Slides
For Each oHl In oSl.Hyperlinks
If oHl.Address <> "" Then
Set opres = Presentations.Open(oHl.Address, msoFalse)
With opres
..PrintOptions.PrintHiddenSlides = msoFalse
..PrintOut
End With
opres.Close
Set opres = Nothing
End If
Next
Next
End Sub
--

Did that answer the question / help?
_____________________________
John Wilson
Microsoft Certified Office Specialist
http://www.technologytrish.co.uk/ppttipshome.html
 
John:

Thanks. That was very useful. Shyam's post was also helpful.

One last question...is there a property I can set to print from
last slide to first slide, i.e. to print the slides in reverse order?

Regards,

Charles
 
Back
Top