Partilhar via


Propriedade ShapeRange.AutoShapeType (PowerPoint)

Retorna ou define o tipo de forma para o objeto ShapeRange especificado, o qual deve representar uma AutoForma que não seja uma linha, um desenho de forma livre ou um conector. Leitura/gravação.

Sintaxe

expressão. AutoShapeType

Expressão Uma variável que representa um objeto ShapeRange .

Valor de retorno

MsoAutoShapeType

Comentários

Use a propriedade Type do objeto ConnectorFormat para definir ou retornar o tipo de conector.

Exemplo

Este exemplo substitui todos as estrelas de 16 pontas por estrelas de 32 pontas em myDocument.

Set myDocument = ActivePresentation.Slides(1) 
For Each s In myDocument.Shapes 
    If s.AutoShapeType = msoShape16pointStar Then 
        s.AutoShapeType = msoShape32pointStar 
    End If 
Next

Observação

Quando você altera o tipo de uma forma, ela retém o tamanho, a cor e outros atributos.

Confira também

Objeto ShapeRange

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.