✔ ppt in jpg speichern mit vbs

[deen_90]

hallo

Leider stehe ich bei dieser Aufgabe an...Ich muss mit VBS eine PowerPoint Präsentation öffnen und dann als .jpg speicher. Leider finde ich niergends wie ich das machen kann. Momentan habe ich einen bestimmten Pfad angegeben, aber ich möchte dies auch noch ändern und da steh ich leidr au an.

Ich hoffe jemand kann mir helfen

glg deni

 

[Elvan]

Ich schätze eine "Snapshot" Funktion sollte dein .jpg Problem lösen. Mit der kannst Du denn Desktop "fotografieren" (geht auch mit einem Fenster, aber da wird´s schon schwieriger).
Den Pfad kannst du einfach als String angeben und dann über ne TextBox manuell angeben.
Für letzteres gibs auch ne Standartfunktion, aber das ist dann auch etwas aufwendiger.

 

[deen_90]

hm....wie meinst du das?

also bis jetzt hab ich das:

Option Explicit

Dim PowerPoint
Dim Doc
dim datei

Set PowerPoint=CreateObject ("PowerPoint.application")
PowerPoint.visible = true
set datei=GetObject("C:\LEX Infos März 2006.ppt")

die datei soll jez in ein jpg gespeichert werden. in VBA gibt es ja den Befehl datei.saveAs Filename=:"C:\LEX Infos März 2006.jpg"
aber leider geht das bei VBS nicht.