Can not Open PowerPoint In Excel

[Kevsim]

I am using Excel and PowerPoint version 2002.
I am trying to open a PowerPoint file from within Excel.
The VB Library in Excel is set for (Tools\References\Microsoft PowerPoint 10.0 Object Library).

The file I am trying to use opens OK in PowerPoint from the location, but from VB it only opens a blank PowerPoint screen, then an error message -
"Runtime Error 438, Object does't support this property or method".

The code is as follows -

Private Sub cmdAdd_Click()
Set Power = CreateObject("PowerPoint.Application")
Power.Visible = True
Power.Application.Open ("C:\Italy-Pavarotti.ppt")

End Sub

I would appreciate some advise.
kevsim

 

[PHV]

Power.[!]Presentations[/!].Open "C:\Italy-Pavarotti.ppt"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Kevsim]

PHV,
Works OK. thanks for the info.
kevsim