Shapes.Add3DModel (Excel)

Creates a 3D model from an existing file. Returns a Shape object that represents the new 3D model.

The value of the LinkToFile parameter can be one of these MsoTriState constants.

Add3DModel (Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

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 )

Arguments

The following argument is required

Filename (String) - The file from which the 3D model is to be created.

Optional arguments

The following arguments are optional

LinkToFile (Boolean) - Determines whether the 3D model will be linked to the file from which it was created.

SaveWithDocument (Boolean) - Determines whether the linked 3D model will be saved with the document into which it is inserted.

Left (Points) - The position (in points) of the upper-left corner of the 3D model relative to the upper-left corner of the document.

Top - The position (in points) of the upper-left corner of the 3D model relative to the top of the document

Width (Long) - The width of the 3D model, in points (enter -1 to auto-calculate a width based on the 3D model dimensions).

Height (Long) - The height of the 3D model, in points (enter -1 to auto-calculate a height based on the 3D model dimensions).