Align Method Example
This example aligns the left edges of all the shapes in the selection of shapes in myDocument with the left edge of the leftmost shape in the range.
myDocument
Set myShapeRange = Selection.ShapeRange myShapeRange.Align msoAlignLefts, False