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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。