代表形状区域，它是文档中的一组形状。

说明

形状区域可以只包含文档中的一个形状，或者也可包含所有形状。您可以在形状区域中包含所需的任意形状（在文档中的所有形状中选取，或从选定内容中的所有形状中选取）。例如，您可以构造一个 ShapeRange 集合，它包含文档中前三个形状、文档中所有选定的形状，或文档中所有的任意多边形的。

示例

返回指定名称或索引号的一组形状

使用 Shapes.Range(index)（其中 index 是形状的名称或索引号，或由形状的名称或索引号组成的数组）可返回代表文档中的一组形状的 ShapeRange 集合。您可以使用 Array 函数来构造名称或索引号的数组。下例设置 myDocument 上形状一和三的填充图案。

let myDocument = Worksheets.Item(1)
myDocument.Shapes.Range([1, 3]).Fill.Patterned(msoPatternHorizontalBrick)

下例设置 myDocument 上名为“Oval 4”和“Rectangle 5”的形状的填充图案。

虽然可以使用 Range 属性来返回任意数量的形状或幻灯片，但如果您只想返回一个集合成员，则使用 Item 方法会更简单。例如，Shapes(1) 比 Shapes.Range(1) 简单。

let myDocument = Worksheets.Item(1)
let myRange = myDocument.Shapes.Range(["Oval 4", "Rectangle 5"])
myRange.Fill.Patterned(msoPatternHorizontalBrick)

返回文档中全部或部分选定的形状

使用 Selection 对象的 ShapeRange 属性可返回选定对象中的所有形状。下例设置窗口一中选定对象的所有形状的填充前景色（假定所选内容中至少有一个形状）。

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

使用 Selection.ShapeRange(index)（其中 index 是形状的名称或索引号）返回某一选定的形状。下例设置了窗口一内选定形状的集合中形状二的前景填充色（假定该选定内容中至少有两个形状）。

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