IsNamedShow Property Example

If the slide show running in slide show window one is a custom slide show, this example displays its name.

With SlideShowWindows(1).View
    If .IsNamedShow Then
        MsgBox "Now showing in slide show window 1: " _
           & .SlideShowName
    End If
End With