ShapeRange.AutoShapeType 属性 (PowerPoint)

返回或设置指定的 ShapeRange 对象代表除线条、 任意多边形图形或连接符自选图形的类型。 读/写。

语法

表达式。AutoShapeType

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

返回值

MsoAutoShapeType

备注

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

示例

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

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

注意

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

另请参阅

绘图对象

支持和反馈

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