Share via


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