Powerpoint VisualBasic Script

Sub first()
    ActivePresentation.SlideShowWindow.View.First
End Sub