Всем привет! 👋
Сегодня рассмотрим пример решения позволяющий выполнить импорт данных с листа Excel и создать презентацию в PowerPoint.
📢 Файл с примером размещен в конце статьи 🔽
▶️ Цель и задача
Целью данного макроса является автоматическое создание презентации в PowerPoint на основе данных, представленных в Excel. Макрос будет брать графические объекты (графики) из активного листа Excel, создавать для них слайды в PowerPoint и добавлять соответствующие значения на слайды.
▶️ Подготовка
Перед началом использования макроса необходимо подготовить документ Excel и иметь графики, которые вы хотите включить в презентацию.
🔔 Важно также убедиться, что у вас установлен PowerPoint.
🔘 Пример исходных данных:
На отдельном листе добавим требуемые графики и комментарии к ним:
▶️ Импорт данных с листа Excel в PowerPoint
Приведенный пример макроса создает PowerPoint-презентацию и добавляет на каждый слайд графику из графических объектов на активном листе Excel:
📝 Принцип работы:
Макрос использует объекты PowerPoint.Application и Excel.ChartObject для взаимодействия с Excel и PowerPoint соответственно.
- Сначала проверяем наличие активного экземпляра PowerPoint. Если нет открытых презентаций, будет создан новый экземпляр.
- Далее, проходим по всем графикам на активном листе Excel (ChartObjects).
- Для каждого графика создается новый слайд с макетом ppLayoutText.
- График копируется в буфер обмена и вставляется на слайд презентации.
- Для каждого слайда устанавливается текст заголовка и значения, которые зависят от содержимого графика.
Обратите внимание! Код динамически вставляет значения от начальной строки (B5 или D5) до последней заполненной строки в столбце B или D в зависимости от текста заголовка графика. Что позволяет добавлять любое число строк для примечания.
- Презентация делается видимой, и PowerPoint активируется:
▶️ Преимущества
- Экономия времени: Вместо ручного создания презентации и копирования данных из Excel в PowerPoint, макрос выполняет всю работу автоматически.
- Минимизация ошибок: Автоматическая обработка данных снижает вероятность ошибок в процессе переноса данных.
- Повторяемость: Макрос можно использовать снова и снова для создания презентаций с разными данными.
- Согласованность: Все презентации, созданные с использованием макроса, будут иметь единый стиль и формат.
📍 Рекомендуемые статьи 🔽