DisplaySlideMiniature Property Example

If document window one is in slide view, this example displays the slide miniature window.

With Windows(1).View
    If .Type = ppViewSlide Then .DisplaySlideMiniature = True
End With