Herbers Excel-Forum - das Archiv

Powerpoint-Präsentation aus Excel erstellen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Powerpoint-Präsentation aus Excel erstellen
von: Fraggle
Geschrieben am: 26.09.2003 10:18:22
Hallo an alle hilfswilligen guten Geister,

eigentlich habe ich eine wahrscheinlich nur sehr einfache Frage: Was muss ich tun, um über einen CommandButton in einer Excel-Tabelle eine neue PP-Präsentation auf Basis einer in einem bestimmten Verzeichnis befindlichen *.pot-Vorlage zu erstellen und diese dann unter einem Dateinamen, der sich aus einer bestimmten Zelle eines Excel-Arbeitsblattes und dem aktuellen Datum zusammensetzt, zu speichern?

Danke schonmal für die Mühe und Hilfe,
Fraggle

Bild

Betrifft: AW: Powerpoint-Präsentation aus Excel erstellen
von: Fraggle
Geschrieben am: 26.09.2003 11:45:57
Hat sich erledigt, hier die Lösung!



Private Sub Präsentation_Click()
Dim oApplPPoint As Object
Set oApplPPoint = CreateObject("Powerpoint.Application")
With oApplPPoint
.Visible = True
.WindowState = 2
.Activate
.Presentations.Open Filename:="D:\Vorlagen\Präsentation.pot", Untitled:=msoTrue
.ActivePresentation.SaveAs Filename:="D:\Präsentationen Ablage\" & Worksheets("Sheet1").Range("a1") & Format(Date, " yyyy-mm-dd - ") & Format(Time, "hh_mm") & " Uhr"
End With
End Sub


 Bild
Excel-Beispiele zum Thema " Powerpoint-Präsentation aus Excel erstellen"
Bei falscher Eingabe alten Wert wiederherstellen Automatisch Sicherungsdatei erstellen
Eigene Menüleiste mit Untermenüs erstellen Arbeitsmappen-History erstellen
Per VBA einen Verweis zu einer *.DLL erstellen Startansicht wiederherstellen
Aus AddIn neue Arbeitsmappe mit Code erstellen Benutzerdefinierte Funktion durch Code erstellen und löschen
Faxbestellung auf Grundlage einer Artikelliste erstellen Seitenumbruch ermitteln und Übertrag erstellen