Align Method
Aligns the shapes in the specified range of shapes.
expression.Align(AlignCmd, RelativeTo)
*expression * Required. An expression that returns a ShapeRange object.
MsoAlignCmd
MsoAlignCmd can be one of these MsoAlignCmd constants. |
msoAlignBottoms |
msoAlignCenters |
msoAlignLefts |
msoAlignMiddles |
msoAlignRights |
msoAlignTops |
MsoTriState
MsoTriState can be one of these MsoTriState constants. |
msoCTrue |
msoFalse Aligns shapes relative to one another. |
msoTriStateMixed |
msoTriStateToggle |
msoTrue Aligns shapes relative to the edge of the slide. |
Example
This example aligns the left edges of all the shapes in the specified range in myDocument
with the left edge of the leftmost shape in the range.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.Range.Align msoAlignLefts, msoFalse
Applies to | ShapeRange Collection Object
See Also | Distribute Method