PowerPoint - SlideShow



Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: PowerPoint - SlideShow
von: Hans-Jörg
Geschrieben am: 04.06.2002 - 16:50:32

Hallo,
ich habe das Problem PP nicht schließen zu können.
mit folgendem Code, starte ich eine Präsentation.

Private Sub cmdProzessBeschr_Click()
   Dim ProzBeschrPDNam$
   Dim PP As Object
   ProzBeschrPDNam = "C:\Test_PP\PP_Test.ppt"
   On Error GoTo s
   AppActivate "Microsoft PowerPoint"
   GoTo n
s:
   Application.ActivateMicrosoftApp (xlMicrosoftPowerPoint)
n:
   Set PP = GetObject(ProzBeschrPDNam)
   PP.SlideShowSettings.Run

Was passiert, was ist falsch:
- PowerPoint wird geöffnet mit einer neuen Folie.- FALSCH
- SlideShow wird gestartet - RICHTIG
- Nach dem Ende geht's zurück nach PowerPoint -- FALSCH

. PowerPoint soll nicht geöffnet werden.
. Es soll nur die Präsentation gezeigt werden.
. Danach soll Excel selbst erkennen wenn die Präsentation zu ende ist und PP soll restlos geschlossen werden.
Habe schon einiges aus dem Archiv ausprobiert. Hat nicht geholfen
Währe schön wenn jemand weiter weis.

nach oben   nach unten

Re: PowerPoint - SlideShow
von: Hans W. Herber
Geschrieben am: 05.06.2002 - 03:08:41

Hallo Hans-Jörg,

siehe Beispiel-Arbeitsmappe unter:
https://www.herber.de/bbs/texte/9pprun.xls

hans

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "PowerPoint - SlideShow "