The Hidden Slide Icon in PowerPoint 2003

[Outlook Convert]

After hidding a slide, PowerPoint 2003 displays the Hidden Slide icon next to
or below the slide you've hidden. Is there a way to have the Hidden Slide
icon appear on a printed hard copy? Just for clarification, I'm not asking
how to print hidden slides. I know about the "Print Hidden Slide" checkbox
in the Printer dialog box. I'm asking if there is a way to have the icon
slide print out on the slide. Thanks in advanced.

 

[John Wilson]

AFAIK not in standard Powerpoint. It would be very easy to write a macro to
cycle through all slides and put a mark on all hidden slides (and remove it
again when required)

 

[Outlook Convert]

Can you provide me with the steps for writing a macro to perform this action?
By the way, what does AFAIK stand for?

 

[John Wilson]

As Far As I Know

Simplest way (AFAIK!)

Run this :

Sub markit()
Dim osld As Slide
Dim oshp As Shape
For Each osld In ActivePresentation.Slides
If osld.SlideShowTransition.Hidden = msoTrue Then
Set oshp = osld.Shapes.AddTextbox(msoTextOrientationHorizontal, 10, 10, 20,
20)
oshp.TextFrame.TextRange = "H"
oshp.Name = "Hidden"
End If
Next osld
End Sub

Which will mark hidden slides with an "H"

and this to remove all the marks

Sub unmarkit()
Dim osld As Slide
Dim oshp As Shape
For Each osld In ActivePresentation.Slides
For Each oshp In osld.Shapes
If oshp.Name = "Hidden" Then oshp.Delete
Next oshp
Next osld
End Sub