|
Hallo,
ich habe mir in PowerPoint ein eigenes Add-In mit für mich nützlichen Funktionen gebaut.
Jetzt möchte ich in dessen Ribbon eine Gallerie einbauen, und per Klick auf das jeweilige Bild dieses auf der Folie einfügen (z.B. einen Draft-Stempel).
Gallerie einbauen ist auch nicht das Problem, aber das Einfügen des Bildes, welches sich NICHT in irgendeinem hardcodierten Pfad befinden soll, sondern ja eh schon in der Datei unter customUI\images eingebettet ist.
Die Funktion AddPicture hätte bei FileName ja grundsätzlich gerne einen Pfad, unter dem Sie das Bild findet. Wie bekomme ich es hin, dass ich das Bild verwende, welches in der Datei eingebettet ist und auch in der Gallerie meines Ribbons angezeigt wird?
Sub TestMacro()
ActiveWindow.Selection.SlideRange.Shapes.AddPicture( _
FileName:="FlagGermany.png", _
LinkToFile:=msoFalse, _
SaveWithDocument:=msoTrue, Left:=60, Top:=35, _
Width:=98, Height:=48).Select
End Sub
|