Shapes.AddOLEObject-Methode (Publisher)
Fügt der angegebenen Shapes-Auflistung ein neues Shape-Objekt hinzu, das ein OLE-Objekt darstellt.
Syntax
Ausdruck. AddOLEObject (Left, Top, Width, Height, ClassName, FileName, Link)
expression Eine Variable, die ein Shapes-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Left | Erforderlich | Variant | Die Position der linken Begrenzung der Form, die das OLE-Objekt darstellt. |
| Top | Erforderlich | Variant | Die Position der oberen Begrenzung der Form, die das OLE-Objekt darstellt. |
| Width | Optional | Variant | The width of the shape representing the OLE object. Default is -1, meaning that the width of the shape is automatically set based on the object's data. |
| Height | Optional | Variant | The height of the shape representing the OLE object. Der Standardwert ist -1, was bedeutet, dass die Höhe der Form automatisch basierend auf den Daten des Objekts festgelegt wird. |
| ClassName | Optional | String | Der Klassenname des OLE-Objekts, das hinzugefügt werden soll. |
| FileName | Optional | String | Der Dateiname des OLE-Objekts, das hinzugefügt werden soll. Wenn kein Pfad angegeben ist, wird der aktuelle Arbeitsordner verwendet. |
| Link | Optional | MsoTriState | Bestimmt, ob das OLE-Objekt mit der Publikation verknüpft oder in sie eingebettet ist. |
Rückgabewert
Form
Bemerkungen
Für die Argumente Left, Top, Width und Height werden numerische Werte in Punkt ausgewertet. Zeichenfolgen können in beliebigen Einheiten enthalten sein, die von Microsoft Publisher unterstützt werden (z. B. "2,5 zoll").
Sie müssen entweder einen ClassName oder einen FileName angeben. Wenn kein Argument angegeben ist oder beide Argumente angegeben sind, tritt ein Fehler auf.
Der Link-Parameter kann eine der msoTriState-Konstanten sein, die in der Microsoft Office-Typbibliothek deklariert und in der folgenden Tabelle angezeigt werden.
| Konstante | Beschreibung |
|---|---|
| msoFalse | Das OLE-Objekt ist eingebettet. |
| msoTrue | Das OLE-Objekt ist verknüpft. Standardwert. |
Beispiel
Im folgenden Beispiel wird der ersten Seite der aktiven Publikation ein Microsoft Office Excel-Arbeitsblatt hinzugefügt und das Arbeitsblatt zum Bearbeiten aktiviert.
Dim shpSheet As Shape
Set shpSheet = ActiveDocument.Pages(1).Shapes.AddOLEObject _
(Left:=72, Top:=72, ClassName:="Excel.Sheet")
shpSheet.OLEFormat.Activate
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.