Choosing Open Powerpoint Presentation

  • Thread starter Thread starter Barb Reinhardt
  • Start date Start date
B

Barb Reinhardt

I'm running this code out of Excel and am having difficulty with the
following line

MyFileName = "BarbsFile.ppt"

'This doesn't work, and used to
On Error Resume Next
Set myPPT = PPTApp.Presentations(myFileName)
On Error GoTo 0

'This does work
For each myPPT in PPTApp.Presentations
if myPPT.Name = myfilename then
Set myPPT1 = myPPT
Exit for
end if
next myPPT

Thanks,
Barb Reinhardt
 
I'm running this code out of Excel and am having difficulty with the
following line

MyFileName = "BarbsFile.ppt"

'This doesn't work, and used to
Click to expand...

I don't believe the code has ever worked, because if it had, PPT would have
harmonized the usage of uppercase letters in myfilename, MyFileName and
myFileName...
 
Back
Top