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 ou define o tipo de forma do objeto Shape ou ShapeRange especificado, que deve representar uma AutoForma que não seja uma linha, um desenho de forma livre ou um conector. MsoAutoShapeType de leitura/escrita.
Sintaxe
expressão. AutoShapeType
expressão Uma variável que representa um objeto Shape.
Comentários
Quando você altera o tipo de uma forma, ela retém o tamanho, a cor e outros atributos.
Utilize a propriedade Tipo do objeto ConnectorFormat para definir ou devolver o tipo de conector.
Exemplo
Este exemplo substitui todos as estrelas de 16 pontas por estrelas de 32 pontas em myDocument.
Set myDocument = Worksheets(1)
For Each s In myDocument.Shapes
If s.AutoShapeType = msoShape16pointStar Then
s.AutoShapeType = msoShape32pointStar
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.