Powerpoint VisualBasic Script

Sub last()
    ActivePresentation.SlideShowWindow.View.Last
End Sub