Mr. John Wilson you are amazing.

Here is the final product with your help.

Sub jump()
Dim JumpToSlide As Integer
JumpToSlide = InputBox("Jump To Slide Number")
ActiveWindow.View.GotoSlide JumpToSlide
End Sub

Just so you know I am working on creating a cartoon and all of these vba snippets have been a huge help in facilitating it. I do it all with powerpoint in a frame by frame type style.

Without a doubt John I will be putting you in the credits.

Thanks again.