本方法用于对齐指定图形区域中的图形。
expression.Align(Align, RelativeTo)
expression 必需。该表达式返回“应用于”列表中的一个对象。
Align MsoAlignCmd,必需。指定在特定图形区域中对齐图形的方式。
MsoAlignCmd 可以是下列 MsoAlignCmd 常量之一: |
msoAlignCenters |
msoAlignMiddles |
msoAlignTops |
msoAlignBottoms |
msoAlignLefts |
msoAlignRights |
RelativeTo Long 类型,必需。如果将该属性设为 True,则根据文档边缘对齐图形;如果将该属性设为 False,则相对其他图形对齐图形。
本示例将 myDocument
中选定区域内所有图形的左边缘与该区域最左边的图形的左边缘对齐。
Set myShapeRange = Selection.ShapeRange
myShapeRange.Align msoAlignLefts, False