openen powerpoint presentatie vanuit excel

[mieoli]

Hoe kan ik vanuit excel met vb een powerpointpresentatie openen?

Sub OpenInfo_PresentatieVanMij()
Set appPPT = CreateObject("Powerpoint.Application")
appPPT.Visible = True
appPPT.Powerpoint.Open Filename:="c:\presentatieVanMij.ppt"
End Sub

op deze manier blijkt het niet te lukken.
alvast bedankt.

 

[Wigi]

Waar krijg je een foutmelding, en welke? Of helemaal niets?

 

[mieoli]

bij de voorlaatste zin komt de melding "object doesn't support this property or method"
de applicatie powerpoint gaat wel open maar het gevraagde document wordt niet opgehaald.

 

[Finch]

Vervang die laatste lijn code eens door:

appPPT.Presentations.Open Filename:="c:\presentatieVanMij.ppt"

 

[Wigi]

Idd Finch

Zo zou ik het schrijven:

Sub OpenInfo_PresentatieVanMij()

    Dim appPPT As PowerPoint.Application
    Dim presPPT As PowerPoint.Presentation
    
    Set appPPT = CreateObject("Powerpoint.Application")
    appPPT.Visible = True
    
    Set presPPT = appPPT.Presentations.Open(Filename:="C:\presentatieVanMij.ppt")
    
End Sub

Wigi

 

[mieoli]

oke werkt prima zo, mercie!