POT datei aus VB starten

[Anke-Petra]

Hallo zusammen

Juchuu...mit Word und Excel funktionierts jetzt. (doc.dot.xls und xlt)

Das Problem ist jetzt bei den POT-Dateien (PowerpointVorlagen) Ich wählte eigentlich das selbe vorgehen. Jedoch kommt die Meldung:

"Typen Unverträglich (load_Powerpoint.Presentation.add"

Mit den PPT (mode 0) und .open funktioniert es.

Kann mir jemand weiterhelfen?

AP

function load_Powerpoint(mode, pfad)
    'mode 0 = normal open
    'mode 1 = open as dot
    Set load_Powerpoint = CreateObject("Powerpoint.Application")
    ' Display the application.
     load_Powerpoint.Visible = TRUE

' Open the document.
   ' mode 1 = pot file 0 = ppt
   if mode = 1 then load_Powerpoint.Presentations.Add (pfad) end if
   if mode = 0 then load_Powerpoint.Presentations.Open (pfad) end if
    ' Close the object variable.
    Set load_Powerpoint = Nothing
end function