Shape.AutoShapeType 属性 (Excel)

返回或设置指定的 Shape 或 ShapeRange 对象的形状类型，该对象必须代表自选图形，而不能代表直线、任意多边形图形或连接符。 读/写 MsoAutoShapeType。

语法

表达式。AutoShapeType

表达 一个代表 Shape 对象的变量。

备注

改变一个形状的类型时，该形状保留其大小、颜色和其他属性。

使用 ConnectorFormat 对象的 Type 属性可设置或返回连接器类型。

示例

本示例在 myDocument 中用 32 角星替换所有 16 角星。

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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。