Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna um objeto Application que representa o criador do objeto especificado.
Sintaxe
expression. Aplicativo
expressão Uma variável que representa um objeto Model3DFormat .
Valor de retorno
Objeto
Exemplo
Este exemplo apresenta o nome da aplicação que criou cada objeto de modelo 3D no diapositivo um na apresentação ativa.
For Each shp3DModel In ActivePresentation.Slides(1).Shapes
If shp3DModel.Type = mso3DModel Then
MsgBox shpOle.Model3D.Application.Name
End If
Next
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.