Propriedade ShapeRange.AutoShapeType (Excel)

Retorna ou define o tipo de forma para o objeto Shape ou ShapeRange especificado, que deve representar um AutoShape diferente de uma linha, desenho de forma livre ou conector. MsoAutoShapeType de leitura/gravação.

Sintaxe

expressão. AutoShapeType

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

Comentários

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

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 = 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.