Shapes.AddOLEObject-Methode (PowerPoint)

Artikel
04/07/2023

Erstellt ein OLE-Objekt. Gibt ein Shape -Objekt zurück, das das neue OLE-Objekt darstellt.

Syntax

Ausdruck. AddOLEObject( _Left_, _Top_, _Width_, _Height_, _ClassName_, _FileName_, _DisplayAsIcon_, _IconFileName_, _IconIndex_, _IconLabel_, _Link_ )

expression Eine Variable, die ein Shapes-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Left	Optional	Single	The position (in points) of the upper-left corner of the new object relative to the upper-left corner of the slide. The default value is 0 (zero).
Top	Optional	Single	The position (in points) of the upper-left corner of the new object relative to the upper-left corner of the slide. The default value is 0 (zero).
Width	Optional	Single	Die ursprüngliche Breite des OLE-Objekts in Punkten.
Height	Optional	Single	Die ursprüngliche Höhe des OLE-Objekts in Punkten.
ClassName	Optional	String	Der lange OLE-Klassenname oder die ProgID für das zu erstellende Objekt. Sie müssen das Argument ClassName oder FileName für das Objekt angeben, jedoch nicht beide Argumente.
FileName	Optional	String	Die Datei, aus der das Objekt erstellt werden soll. Wenn der Pfad nicht angegeben wird, wird der aktuelle Arbeitsordner verwendet. Sie müssen das Argument ClassName oder FileName für das Objekt angeben, jedoch nicht beide Argumente.
DisplayAsIcon	Optional	MsoTriState	Bestimmt, ob das OLE-Objekt als Symbol angezeigt wird.
IconFileName	Optional	String	Die Datei, die das anzuzeigende Symbol enthält.
IconIndex	Optional	Long	Der Index des Symbols in IconFileName. Das erste Symbol in der Datei weist die Indexnummer 0 (Null) auf. Wenn kein Symbol mit der angegebenen Indexnummer in IconFileName vorhanden ist, wird das Symbol mit der Indexnummer 1 (das zweite Symbol in der Datei) verwendet. Der Standardwert ist 0 (Null).
IconLabel	Optional	String	Ein Bezeichnungsfeld (Beschriftung), das unter dem Symbol angezeigt wird.
Link	Optional	MsoTriState	Bestimmt, ob das OLE-Objekt mit der Datei verknüpft wird, aus der es erstellt wurde. Wenn Sie einen Wert für ClassName angeben, muss dieses Argument MsoFalse sein.

Rückgabewert

Form

Beispiel

In diesem Beispiel wird myDocument ein verknüpftes Word-Dokument hinzugefügt.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _ 
    Width:=200, Height:=300, _ 
    FileName:="c:\my documents\testing.doc", Link:=msoTrue

In diesem Beispiel wird myDocument ein neues Microsoft Excel-Arbeitsblatt hinzugefügt. Das Arbeitsblatt wird als Symbol angezeigt.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _ 
    Width:=200, Height:=300, _ 
    ClassName:="Excel.Sheet", DisplayAsIcon:=True

In diesem Beispiel wird myDocument eine Befehlsschaltfläche hinzugefügt.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _ 
    Width:=150, Height:=50, ClassName:="Forms.CommandButton.1"

Siehe auch

Shapes-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Share via