ShapeRange 对象 (Word)

代表一个形状范围,即某个文档中的一组形状。 一个形状范围可以只包含一个形状,也可以包含该文档中的所有形状。

备注

可以包含所需的任何形状(从文档中的所有形状中选择的形状或所选内容中的所有形状)来构造形状区域。 例如,可以构造一个 ShapeRange 集合,该集合包含文档、 文档中所有选定的图形或文档中的所有任意多边形中的前三个形状。 [!注释] 与 形状 对象可以执行的大多数操作,您还可以执行与一个 ShapeRange 对象,该对象包含一个形状。 某些操作,一个 ShapeRange 对象,该对象包含多个形状,在执行时将导致错误。

使用 Range (索引) ,其中 index 是形状的名称或索引号或包含形状名称或索引号的数组,可返回一个 ShapeRange 集合,该集合代表文档中的一组形状。 使用 Visual Basic 的 Array 函数构造名称或索引号数组。 下面的示例设置活动文档中的一个和三个形状的填充图案。

ActiveDocument.Shapes.Range(Array(1, 3)).Fill.Patterned _ 
 msoPatternHorizontalBrick

以下示例在活动文档中选择名为“椭圆 4”和“矩形 5”的形状。

ActiveDocument.Shapes.Range(Array("Oval 4", "Rectangle 5")).Select

尽管您可以使用 范围 方法返回任意数目的形状,它是易于使用的 项目 如果要返回集合的单个成员的方法。 例如, Shapes(1)是比 Shapes.Range(1)更简单。

使用 ShapeRange (索引) ,其中 index 是名称或索引号,可返回代表选定内容中形状的 Shape 对象。 假定所选内容包含至少一个形状,则以下示例为所选内容中的第一个形状设置填充效果。

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

以下示例选择活动文档第一节中的所有形状。

Set myRange = ActiveDocument.Sections(1).Range 
myRange.ShapeRange.Select

使用 对齐分发zorder 方法 要将一组形状相对于彼此或相对于文档的方法。

使用 重新组合 ,或 取消分组 从形状区域而形成的方法来创建和使用的单个形状。 Shape 对象的 GroupItems 属性返回 GroupShapes 对象,该对象表示已组合形成一个形状的所有形状。

录制器始终使用 ShapeRange 当录制的形状的属性。

注意

[!注释] 一个 ShapeRange 对象不包括 InlineShape 对象。

方法

属性

另请参阅

支持和反馈

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