Shapes.AddShape 方法 (PowerPoint)

创建一个自选图形。 返回一个 Shape 对象,该对象表示新的自选图形。

语法

expressionAddShape( _Type_, _Left_, _Top_, _Width_, _Height_ )

expression:一个表示 Shapes 对象的变量。

参数

名称 必需/可选 数据类型 说明
Type 必需 MsoAutoShapeType 指定要创建的自选形状的类型。
Left 必需 Single 自选形状左边缘相对于幻灯片左边缘的位置(以磅为单位)。
Top 必需 Single 自选形状上边缘相对于幻灯片上边缘的位置(以磅为单位)。
Width 必需 Single 自选形状的宽度(以磅为单位)。
Height 必需 Single 自选形状的高度(以磅为单位)。

返回值

Shape

说明

若要更改已添加自选图形的类型,设置 AutoShapeType 属性。

示例

本示例向 myDocument 中添加矩形。

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddShape Type:=msoShapeRectangle, _ 
    Left:=50, Top:=50, Width:=100, Height:=200

另请参阅

Shapes 对象

支持和反馈

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