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.