ShapeRange.Distribute (PowerPoint)

Evenly distributes the shapes in the specified range of shapes. You can specify whether you want to distribute the shapes horizontally or vertically and whether you want to distribute them over the entire slide or just over the space they originally occupy.

Syntax : expression.Distribute (DistributeCmd, RelativeTo)

ActiveWindow.RangeFromPoint.Ungroup.Distribute DistributeCmd:=msoDistributeHorizontally, RelativeTo:=msoTrue

Arguments

The following arguments are required:

DistributeCmd (Office.MsoDistributeCmd) - Specifies whether shapes in the range are to be distributed horizontally or vertically.

RelativeTo (Office.MsoTriState) - Determines whether shapes are distributed evenly over the entire horizontal or vertical space on the slide.