![]() |
|
#1
|
|||
|
|||
|
Hello Forum, thank you for taking the time to look at this.
In an Excel module (Excel is host) I am opening an existing PPT like this: Code:
Dim ppte As Object
Dim oPAe As PowerPoint.Application
Dim oPPe As PowerPoint.Presentation
Dim oPSe As PowerPoint.Slide
Dim oShapee As PowerPoint.Shape
Dim oPicturee As PowerPoint.Shape
With ppt <--this is a typo, should be 'with ppte' as explained 2 threads down)
.Visible = True
.Presentations.Open ("C:\Users\User\Documents\MyPPT.ppt")
End With
Code:
ActiveWindow.View.GotoSlide 3 'works inside ppt Code:
With ppte
.View.GotoSlide 11
End With
Last edited by CatMan; 04-11-2012 at 04:59 PM. |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Automate Office Attendance | kgwack | Outlook | 0 | 02-14-2012 09:39 AM |
| Powerpoint/Excel | richiejjj | PowerPoint | 0 | 02-09-2012 07:20 AM |
| How to automate all slides | Pemberton | PowerPoint | 1 | 11-09-2011 04:39 PM |
| Automate Data from Excel into Word DropDown...? | sigraves | Word VBA | 0 | 08-03-2009 06:54 AM |
| Automate Excel tabname | deegz | Excel | 2 | 12-08-2008 02:57 AM |