Самый простой способ центрировать несколько объектов в PowerPoint

Question

Скажем, в PowerPoint у меня есть три прямоугольные фигуры одинакового размера, расположенные горизонтально рядом друг с другом, и я хочу центрировать их на слайде в виде группы. Если я выберу все три из них и нажму кнопку «Выровнять»> «Центр», они будут выровнены по одному - каждый из них подходит к центру, поэтому в конце они будут перекрывать друг друга, и будет виден только один из них. , Я хочу сохранить их распределение (промежутки между ними) и выровнять группу в целом.

Что мне нужно сделать сейчас:

1. Выберите эти три объекта
2. Сгруппируйте их
3. Invoke Align> Центр
4. Разгруппировать их

Можно ли как-то избежать надоедливых шагов два и четыре? В моем случае это очень частая операция, и поведение по умолчанию просто не делает то, что я хочу, в 99% случаев. Может быть, какие-то настройки или умный макрос?

Кстати, это PowerPoint 2013, если это имеет какое-либо значение.

Answer 1

Вы также можете использовать вертикальные линии по бокам слайда. Когда вы хотите центрировать три прямоугольника.

1. Выделите все три прямоугольника и вертикальные линии
2. Выберите Распределить по горизонтали
3. Когда дизайн слайдов будет завершен, удалите вертикальные линии.

Это больше работы, если вы делаете это только один раз, но с несколькими объектами это сэкономит ваше время. Вы можете скопировать и вставить вертикальные линии на каждый слайд, чтобы сэкономить ваше время.

Answer 2

Вы можете сделать это с помощью макроса:

Sub Test()
    Dim shpGroup As ShapeRange
    Set shpGroup = ActiveWindow.Selection.ShapeRange
    shpGroup.Group
    shpGroup.Align msoAlignCenters, msoTrue
    shpGroup.Ungroup
End Sub

Выберите фигуры, для которых вы хотите сделать это, нажмите F8 и запустите этот макрос.

shpGroup.Group группирует объект, shpGroup.Align msoAlignCenters, msoTrue выравнивает группу по центру слайда и shpGroup.Ungroup разгруппированные выбранные объекты впоследствии.

_{Примечание. Обработка ошибок абсолютно отсутствует, поэтому вы будете сталкиваться со всевозможными забавными ошибками, если ничего не выберете, или только одну фигуру и т.д. Не стесняйтесь добавлять обработку ошибок при необходимости.}