Propriedade ShapeRange.AutoShapeType (Excel)

Devolve ou define o tipo de forma para o objeto Shape ou ShapeRange especificado, que tem de representar uma forma automática diferente de uma linha, desenho de forma livre ou conexão. MsoAutoShapeType de leitura/escrita.

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.

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.