Propiedad ShapeRange.AutoShapeType (Excel)

Devuelve o establece el tipo de forma del objeto Shape o ShapeRange especificado, que debe representar una autoforma distinta de una línea, un dibujo de forma libre o un conector. MsoAutoShapeType de lectura y escritura.

Sintaxis

expresión. AutoShapeType

expresión Variable que representa un objeto ShapeRange .

Observaciones

Cuando se cambia el tipo de una forma, ésta mantiene su tamaño, color y otros atributos.

Use la propiedad Type del objeto ConnectorFormat para establecer o devolver el tipo de conector.

Ejemplo

En este ejemplo se reemplazan todas las estrellas de 16 puntas por estrellas de 32 puntas en myDocument.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.