Как создать макрос PowerPoint для изменения размера фотографий

В этой статье объясняется, как создать PowerPoint. макрос для изменения размера фотографий так, чтобы все изображения имели одинаковый размер и занимали одинаковое положение на слайде. Инструкции относятся к PowerPoint 2019, 2016, 2013 и PowerPoint для Microsoft 365.

Добавить изображения в слайды PowerPoint

Если у вас есть большое количество изображений для включения в PowerPoint, ускорите процесс изменения их размера, не повторяя утомительную задачу для каждого изображения, создав макрос, который сделает эту работу за вас.

Прежде чем начать, вставьте все изображения, которые хотите использовать в презентации PowerPoint.

1. Откройте презентацию PowerPoint и выберите первый слайд, который будет содержать изображение.

2. Перейти к Вставлять.

3. Выбирать Фотографий > Изображение из файла.

4. Выберите изображение на вашем компьютере и выберите Вставлять.

5. Повторите этот процесс, чтобы добавить фотографии к другим слайдам презентации.

   

6. Не беспокойтесь о том, что фотографии будут слишком большими или слишком маленькими для слайды в этот момент. Макрос позаботится об изменении размера изображений, чтобы они были одинакового размера.

Запишите макрос для изменения размера изображений

После того, как все изображения были вставлены в презентацию PowerPoint, создайте макрос, чтобы уменьшить все изображения до одинакового размера и положения на слайде. Прежде чем создавать макрос для автоматизации задачи, вы можете потренироваться в выполнении шагов на одном изображении, чтобы убедиться, что вы получите именно те результаты, которые вам нужны.

1. Перейти к Вид и выберите Макросы.

   

2. В диалоговом окне "Макрос" введите Имя макроса.

   Имя может содержать буквы и цифры, но должно начинаться с буквы и не может содержать пробелов. Используйте подчеркивание, чтобы указать пробел в имени макроса.

   

3. В Макро в В списке отображается название презентации, над которой вы работаете.

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

4. Выбирать Создавать открыть Microsoft Visual Basic для приложений.

   

5. Введите следующую информацию, но замените цифры после знака равенства на желаемый размер и расположение изображения. Введите числа в баллах. Например:

   sub ResizePhotos ()
   С ActiveWindow. Выбор. ShapeRange
   Высота = 418,3
   Ширина = 619,9
   Влево = 45
   .Сверху = 45
   Конец с
   Конец подписки
   

   

6. Выбирать Сохранить открыть Сохранить как чат.

7. в Сохранить как тип список, выберите Презентация PowerPoint с поддержкой макросов.

   

8. Выбирать Сохранить.

9. Закройте Visual Basic для приложений.

Применение макроса для изменения размера изображений в презентации

1. Выберите изображение, размер которого хотите изменить.

2. Перейти к Вид и выберите Макросы.

3. Выберите только что созданный макрос и выберите Запустить.

   

4. Ваше изображение будет изменено и перемещено. Продолжайте применять макрос к другим изображениям в презентации.