说明

注释
共有三个代表形状的对象：Shapes 集合，代表文档中的所有形状；ShapeRange 集合，代表文档中指定的形状子集（例如，ShapeRange 对象可以代表文档中的第一个和第四个形状，或代表文档中的所有选定形状）；Shape 对象，代表文档中的单个形状。若要同时使用多个形状或使用选定范围中的多个形状，请使用 ShapeRange 集合。有关如何使用一个形状或同时使用多个形状的概述，请参阅 使用形状（图形对象）。

以下示例说明如何执行下列操作：

• 按名称或编号索引，返回幻灯片上现有的形状。
• 返回幻灯片上新建的形状。
• 返回选定范围中的形状。
• 返回幻灯片上的幻灯片标题和其他占位符。
• 返回与连接符的端点相连的形状。
• 返回演示文稿的默认形状。
• 返回新建的任意多边形。
• 返回组合内的单个形状。
• 返回新组合的一组形状。

示例

使用 Shapes(index) 返回一个代表幻灯片上形状的 Shape 对象，其中 index 是形状名称或索引号。以下示例将 myDocument 中第一个形状和名为“Rectangle 1”的形状进行水平翻转。

let myDocument = ActivePresentation.Slides.Item(1)
myDocument.Shapes.Item(1).Flip(msoFlipHorizontal)
myDocument.Shapes.Item("Rectangle 1").Flip(msoFlipHorizontal)

向 Shapes 集合添加新的图形时，将对该新添加的图形赋以默认的名称。若要为图形指定更有意义的名称，可使用 Name 属性。下例向 myDocument 添加矩形，将其命名为“Red Square”，然后设置该矩形的前景色和线型。

let myDocument = ActivePresentation.Slides.Item(1)
let addshape = myDocument.Shapes.AddShape(msoShapeRectangle, 144, 144, 72, 72)
    addshape.Name = "Red Square"
    addshape.Fill.ForeColor.RGB = (255, 0, 0)
    addshape.Line.DashStyle = msoLineDashDot

若要在幻灯片中添加形状并返回一个代表新建形状的 Shape 对象，请使用 Shapes 集合的下列方法之一：AddCallout 、AddComment 、AddConnector 、AddCurve 、AddLabel 、AddLine 、AddMediaObject 、AddOLEObject 、AddPicture 、AddPlaceholder 、AddPolyline 、AddShape 、AddTable 、AddTextbox 、AddTextEffect 、AddTitle 。

使用 Selection.ShapeRange(index) 返回一个代表选定范围中形状的 Shape 对象，其中 index 是形状名称或索引号。以下示例设置活动窗口选定范围中第一个形状的填充（假定选定范围中至少有一个形状）。

ActiveWindow.Selection.ShapeRange.Item(1).Fill.ForeColor.RGB = (255, 0, 0)

使用 Shapes.Title 返回代表幻灯片标题的 Shape 对象。使用 Shapes.AddTitle 在无标题的幻灯片中添加标题并返回代表新建标题的 Shape 对象。使用 Shapes.Placeholders(index) 返回一个代表占位符的 Shape 对象，其中 index 是占位符的索引号。如果没有改变过幻灯片中形状的排列顺序，则以下三个语句是等价的（假设第一张幻灯片有标题）。

ActivePresentation.Slides.Item(1).Shapes.Title.TextFrame.TextRange.Font.Italic = true
ActivePresentation.Slides.Item(1).Shapes.Placeholders.Item(1).TextFrame.TextRange.Font.Italic = true
ActivePresentation.Slides.Item(1).Shapes.Item(1).TextFrame.TextRange.Font.Italic = true

若要返回一个 Shape 对象，该对象代表连接符所连接的形状之一，请使用 BeginConnectedShape 或 EndConnectedShape 属性。

若要返回代表演示文稿默认形状的 Shape 对象，请使用 DefaultShape 属性。

使用 BuildFreeform 和 AddNodes 方法定义新任意多边形的几何形状，使用 ConvertToShape 方法创建任意多边形并返回代表该形状的 Shape 对象。

使用 GroupItems(index) 返回代表组合形状中的单个形状的 Shape 对象，其中 index 是形状的名称或组合中的索引号。

使用 Group 或 Regroup 方法可对某一范围的形状进行组合，并返回代表新组合的单个 Shape 对象。形成一个组合后，可以像使用任何其他形状一样使用该组合。