Word) (Document.Shapes 属性

返回一个 Shapes 集合,该集合代表指定文档中的所有 图形 对象。 此为只读属性。

语法

表达式形状

表达 一个代表 Document 对象的变量。

备注

该集合可以包含绘图、形状、图片、OLE 对象、ActiveX 控件、文本对象和标注。 有关返回集合的单个成员的信息,请参阅 从集合中返回对象

形状 属性,应用到文档,文档,但不包括页眉和页脚的正文中返回所有 形状 对象。

示例

本示例新建一篇文档,为其添加一个矩形,该矩形宽 100 磅,高 50 磅,并设置矩形的左上角距页面左边缘 5 磅,距页面左上角 25 磅。

Set myDoc = Documents.Add 
myDoc.Shapes.AddShape msoShapeRectangle, 5, 25, 100, 50

本示例为活动文档中所有形状设置填充纹理。

For Each s in ActiveDocument.Shapes 
 s.Fill.PresetTextured msoTextureOak 
Next s

本示例为活动文档中第一个形状添加阴影。

Set myShape = ActiveDocument.Shapes(1) 
myShape.Shadow.Type = msoShadow6

另请参阅

Document 对象

支持和反馈

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