Excel Macro open Powerpoint slideshow and go to slide

[odonnell]

I am struggling to build a macro that will open a Powerpoint file and go to a selected slide.
Below is the code I have but it will only open the powerpoint file, im stuck on getting it to open and go to the slide I choose eg 7

Any help would be great
thanks

Sub Open_PowerPoint_Presentation()
'Opens a PowerPoint Document from Excel
Dim objPPT As Object



Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True

objPPT.Presentations.Open "C:\test.ppt"
ActivePresentation.View.GotoSlide 7



End Sub

 

[Domenic]

Try...

objPPT.ActiveWindow.View.GotoSlide 7

Hope this helps!

 

[odonnell]

Thanks for your help Domenic, I will try this in the morning when im back at work.
Cheers

 

[odonnell]

This is what I was looking for, worked perfectly. Thank you so much for your reply Domenic