Navigation

Powerpoint

  • : Function split() is deprecated in /var/www/vhosts/k97518.web259.dogado.net/WWWROOT/92652/htdocs/modules/filter/filter.module on line 1200.
  • : Function split() is deprecated in /var/www/vhosts/k97518.web259.dogado.net/WWWROOT/92652/htdocs/modules/filter/filter.module on line 1200.

Um zB eine Powerpoint Präsentation mit einer bestimmten Seite zu starten, kann
man folgenden Code verwenden: Ein Verweis auf die Powerpoint-Bibliothek ist erforderlich!

Dim appPP As PowerPoint.Application
Dim ppDatei As Powerpoint.Presentation

Set appPP = CreateObject("PowerPoint.Application")
Set ppDatei = appPP.Presentations.Open("C:\Praesentation.ppt")

appPP.Visible = msoTrue
ppDatei.SlideShowSettings.Run
ppDatei.SlideShowWindow.View.GotoSlide (5)



Hier wird eine Powerpointinstanz geöffnet und dann sichtbar gemacht. Nun wird
die Präsentation gestartet und zu Seite 5 gewechselt.