Shapes.AddShape 方法 (Excel)

返回一 个 Shape 对象,该对象代表工作表上的新自Shape。

语法

表达式AddShape (TypeLeftTopWidthHeight)

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

参数

名称 必需/可选 数据类型 说明
类型 必需 MsoAutoShapeType 指定要创建的自选形状的类型。
Left 必需 Single 自 (边界) 左上角 相对于文档左上角的位置(以点表示)。
Top 必需 Single 自 (框) 左上角相对于文档顶端的位置(以点表示)。
Width 必需 Single 自选形状边框的宽度(以磅为单位)。
Height 必需 Single 自选形状边框的高度(以磅为单位)。

返回值

Shape

备注

若要更改已添加的自Shape的类型,请设置 AutoShapeType 属性。

示例

本示例向 myDocument 中添加矩形。

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddShape msoShapeRectangle, 50, 50, 100, 200

支持和反馈

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