Shapes.Add3DModel (Excel)
Cria um modelo 3D a partir de um arquivo existente. Retorna um objeto Forma que representa o novo modelo 3D.
O valor do parâmetro LinkToFile pode ser uma dessas 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
O seguinte argumento é necessário
Filename (String) - O arquivo a partir do qual o modelo 3D deve ser criado.
Optional arguments
Os seguintes argumentos são opcionais
LinkToFile (Boolean) - Determina se o modelo 3D será vinculado ao arquivo a partir do qual ele foi criado.
SaveWithDocument (Boolean) - Determina se o modelo 3D vinculado será salvo com o documento no qual ele está inserido.
Left (Points) - A posição (em pontos) do canto superior esquerdo do modelo 3D em relação ao canto superior esquerdo do documento.
Top - A posição (em pontos) do canto superior esquerdo do modelo 3D em relação ao topo do documento
Width (Long) - A largura do modelo 3D, em pontos (insira -1 para calcular automaticamente uma largura com base nas dimensões do modelo 3D).
Height (Long) - A altura do modelo 3D, em pontos (insira -1 para calcular automaticamente uma altura com base nas dimensões do modelo 3D).