Shapes.Add3DModel (Excel)
Crea un modelo 3D desde un archivo existente. Devuelve un objeto Shape que representa el nuevo modelo 3D.
El valor del parámetro LinkToFile puede ser una de estas constantes MsoTriState.
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
Un argumento con nombre
Filename (String) - El archivo a partir del cual debe crearse el modelo 3D.
Optional arguments
Los siguientes argumentos son opcionales
LinkToFile (Boolean) - Determina si el modelo 3D se vinculará al archivo desde el que se ha creado.
SaveWithDocument (Boolean) - Determina si se guardará el modelo 3D vinculado con el documento en el que se inserta.
Left (Points) - La posición (en puntos) del vértice superior izquierdo del modelo 3D con relación a la esquina superior izquierda del documento.
Top - La posición (en puntos) del vértice superior izquierdo del modelo 3D con relación a la parte superior del documento
Width (Long) - El ancho del modelo 3D, en puntos (escriba -1 para calcular automáticamente un ancho según las dimensiones de modelo 3D).
Height (Long) - El alto del modelo 3D, en puntos (escriba -1 para calcular automáticamente un alto según las dimensiones de modelo 3D).