Solved

I found code online that does the trick


ActiveWindow.View.GotoSlide index:=4