API: So führen Sie SlideFab 2 beispielsweise mit VBA aus Excel heraus aus

Über die SlideFab-API ist es möglich, die Automatisierung der Folienherstellung mithilfe von VBA aufzurufen. Dies schafft neue Möglichkeiten, z.B. Wenn SlideFab 2 über Ihr VBA-basiertes Excel-Add-In ausgeführt wird. SlideFab wird in einem unbeaufsichtigten Modus ausgeführt, ohne dass eine Benutzerinteraktion erforderlich ist, sodass eine nahtlose Integration möglich ist.

Hierbei ist es wichtig, dass nur der Folien-Erstellungs-Mechanismus in der API verfügbar ist. Das Einrichten der Automatisierung mit den Iterationsschleifen, Verknüpfungen zwischen Excel und Powerpoint usw. muss wie immer im Voraus über die SlideFab-2-Bedienung eingerichtet werden. Außerdem muss der Lizenzschlüssel eingerichtet werden, wenn SlideFab 2 als Flex oder Saver anstelle von Lite ausgeführt wird.

Zum Aufrufen von SlideFab sind nur wenige Codezeilen erforderlich. Die folgende Methode funktioniert beispielsweise in Excel. Es erstellt ein Powerpoint-Anwendungsobjekt und ruft das SlideFab 2-Add-In daraus ab. Die Folienautomatisierung wird über die API mit der Methode MakeSlidesFromWb aufgerufen.

Sub InvokeSlideFabMakeSlides()
    Dim addIn As COMAddIn
    Dim automationObject As Object
    Dim pptApp As Object
    Set pptApp = CreateObject("PowerPoint.Application")
    Set addIn = pptApp.COMAddIns("SlideFab2")
    Set automationObject = addIn.Object
    automationObject.MakeSlidesFromWb pptInputPath:="SomeTemplate.pptx", _
        wb:=ThisWorkbook, _
        pptOutputPath:="SomeOutput.pptx"
    pptApp.Quit
End Sub

Die Methode MakeSlidesFromWb erfordert drei Parameter:

pptInputPath as String: Der relative oder absolute Pfad zur Powerpoint-Vorlagenpräsentation
wb as Excel.Workbook: Ein Verweis auf eine vorhandene Excel-Arbeitsmappe
pptOutputPath as String: Der relative oder absolute Pfad, in den die erstellten Folien geschrieben werden sollen

Vorherige Seite

Nächste Seite

API: So führen Sie SlideFab 2 beispielsweise mit VBA aus Excel heraus aus

SlideFab 2 Anleitung