Shapes.SelectAll 方法 (Word)
选择形状集合中的所有形状。
语法
表达式。SelectAll
expression 是必需的。 一个代表 Shapes 对象的变量。
备注
此方法不会选择 InlineShape 对象。 不能使用此方法可以选择多个画布。
示例
以下示例选择活动文档中的所有形状。
Sub SelectAllShapes()
ActiveDocument.Shapes.SelectAll
End Sub
以下示例选择活动文档的页眉和页脚中的所有形状,并给每一个形状添加红色阴影。
Sub SelectAllHeaderShapes()
With ActiveDocument.ActiveWindow
.View.Type = wdPrintView
.ActivePane.View.SeekView = wdSeekCurrentPageHeader
End With
ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Shapes.SelectAll
With Selection.ShapeRange.Shadow
.Type = msoShadow10
.ForeColor.RGB = RGB(220, 0, 0)
End With
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。