Freigeben über


Shapes.Add3DModel-Methode (Excel)

Erstellt ein 3D-Modell aus einer vorhandenen Datei. Gibt ein Shape-Objekt zurück, das das neue 3D-Modell darstellt.

Syntax

expression.Add3DModel (FileName, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

expression Eine Variable, die ein Shapes-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
FileName Erforderlich String Die Datei, aus der das 3D-Modell erstellt werden soll.
LinkToFile Optional Variant Bestimmt, ob das 3D-Modell mit der Datei verknüpft wird, aus der es erstellt wurde.
SaveWithDocument Optional Variant Bestimmt, ob das verknüpfte 3D-Modell mit dem Dokument gespeichert wird, in das es eingefügt wird.
Left Optional Variant Die Position (in Punkt) der oberen linken Ecke des 3D-Modells relativ zur oberen linken Ecke des Dokuments.
Top Optional Variant Die Position (in Punkt) der oberen linken Ecke des 3D-Modells relativ zum oberen Rand des Dokuments.
Width Optional Variant Die Breite des 3D-Modells in Punkt (geben Sie -1 zur automatischen Berechnung einer Breite basierend auf den Abmessungen des 3D-Modells an).
Height Optional Variant Die Höhe des 3D-Modells in Punkt (geben Sie -1 zur automatischen Berechnung einer Höhe basierend auf den Abmessungen des 3D-Modells an).

Rückgabewert

Form

Bemerkungen

Der Wert des Parameters LinkToFile kann eine der folgenden MsoTriState-Konstanten sein.

Konstante Beschreibung
msoCTrue Nicht unterstützt.
msoFalse Um das 3D-Modell in eine unabhängige Kopie der Datei umzuwandeln.
msoTriStateMixed Nicht unterstützt.
msoTriStateToggle Nicht unterstützt.
msoTrue Um das 3D-Modell mit der Datei zu verknüpfen, aus der es erstellt wurde.

Der Wert des SaveWithDocument-Parameters kann einer der folgenden MsoTriState-Konstanten entsprechen.

Konstante Beschreibung
msoCTrue Nicht unterstützt.
msoFalse Speichert lediglich die Verknüpfungsinformationen in dem Dokument.
msoTriStateMixed Nicht unterstützt.
msoTriStateToggle Nicht unterstützt.
msoTrue Zum Speichern des verknüpften 3D-Modells mit dem Dokument, in das es eingefügt wird. Dieses Argument muss auf msoTrue gesetzt sein, wenn LinkToFile auf msoFalse gesetzt ist.

Beispiel

In diesem Beispiel wird ein aus der Datei „Sphere.glb“ erstelltes 3D-Modell zu mySheethinzugefügt. Das eingefügte 3D-Modell wird in das aktive Dokument eingebettet.

Set mySheet = Application.ActiveWorkbook.ActiveSheet
Set myShape = mySheet.Shapes.Add3DModel(FileName:="c:\my 3d models\sphere.glb", LinkToFile:=False, SaveWithDocument:=True, Left:=100, Top:=100, Width:=70, Height:=70 )

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.