Преобразуйте слайды PowerPoint в единую инфографику.

Вопрос или проблема

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

У меня есть презентация PowerPoint с примерно 8-10 слайдами, эти слайды хорошо оформлены с довольно неплохими визуализациями. Я хотел бы преобразовать их все в одно большое изображение инфографики?

введите описание изображения здесь

Кто-нибудь знает, как это сделать? Я знаю, как преобразовать отдельные слайды в изображение, а затем могу объединить их все в одно вертикальное изображение. Но это довольно утомительно.

Существует ли автоматический способ сделать это?

Спасибо.

Я только сегодня по какой-то причине увидел это.

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

Одно замечание: PPT не создаст слайды более 56 дюймов в любом измерении, так что убедитесь, что ваши слайды не вызовут переполнение. Я не стал проверять это в VBA.

Option Explicit

Sub MakeInfoGraphic()

Dim oInfoPres As Presentation
Dim oInfoSlide As Slide
Dim oPres As Presentation
Dim oSl As Slide
Dim lTop As Long

Set oPres = ActivePresentation
Set oInfoPres = Presentations.Add
oInfoPres.PageSetup.SlideHeight = oPres.PageSetup.SlideHeight * oPres.Slides.Count
oInfoPres.Slides.AddSlide 1, oInfoPres.SlideMaster.CustomLayouts(7) ' Пустой слайд

lTop = 0

For Each oSl In oPres.Slides
    oSl.Copy
    With oInfoPres.Slides(1).Shapes.PasteSpecial(ppPastePNG)
        .Left = 0
        .Width = oInfoPres.PageSetup.SlideWidth
        .Top = lTop
        lTop = lTop + .Height
    End With
Next

End Sub

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

Вы можете перейти в Вставка –> Увеличение –> Обзор увеличения. Выберите все слайды и нажмите Вставить. Это даст вам раздел с одним единственным слайдом со скриншотами всех слайдов. Вы можете изменить их размер, чтобы они вписывались, и экспортировать этот единственный слайд в формате png.

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

У меня есть презентация PowerPoint с примерно 4-5 слайдами, эти слайды хорошо оформлены с довольно неплохими визуализациями. Я хотел бы преобразовать их все в одно большое изображение инфографики?

Ответ или решение

Конвертация слайдов PowerPoint в отдельную инфографику может быть полезной задачей для представления информации в наглядном формате. Ваша цель — интегрировать 8-10 слайдов в одно большое изображение, чтобы выделить ключевые моменты и визуализировать данные. Рассмотрим несколько подходов к этой задаче, включая автоматизацию с использованием VBA и трюки с функциями PowerPoint.

1. Автоматизация через VBA

Если вы знакомы с программированием, вы можете использовать VBA (Visual Basic for Applications) для автоматизации процесса. Вот пример кода, который поможет вам создать одно изображение из нескольких слайдов:

Option Explicit

Sub MakeInfoGraphic()

    Dim oInfoPres As Presentation
    Dim oPres As Presentation
    Dim oSl As Slide
    Dim lTop As Long

    Set oPres = ActivePresentation
    Set oInfoPres = Presentations.Add
    oInfoPres.PageSetup.SlideHeight = oPres.PageSetup.SlideHeight * oPres.Slides.Count
    oInfoPres.Slides.AddSlide 1, oInfoPres.SlideMaster.CustomLayouts(7) ' Пустой слайд

    lTop = 0

    For Each oSl In oPres.Slides
        oSl.Copy
        With oInfoPres.Slides(1).Shapes.PasteSpecial(ppPastePNG)
            .Left = 0
            .Width = oInfoPres.PageSetup.SlideWidth
            .Top = lTop
            lTop = lTop + .Height
        End With
    Next

End Sub

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

2. Использование функции Zoom в PowerPoint

Если вы испытываете трудности с VBA, существует более простой способ — использовать функцию “zoom”. Вот шаги, которые помогут вам получить объединенное изображение:

  1. Откройте свою презентацию.
  2. Перейдите в раздел “Вставка” и выберите “Zoom” → “Суммарный зум”.
  3. Выберите все необходимые слайды и нажмите “Вставить”. Это создаст один слайд, который содержит миниатюры всех выбранных слайдов.
  4. При необходимости измените размеры изображений на созданном слайде.
  5. Экспортируйте этот слайд как изображение (PNG или JPEG).

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

3. Использование специализированных инструментов

Существуют также и другие инструменты для обработки изображений и инфографики, такие как Canva или Piktochart, которые можно использовать для создания более сложных инфографик на базе ваших слайдов. Для этого вам потребуется сохранить слайды как изображения, а затем загрузить их в один из упомянутых инструментов для дальнейшей обработки и дизайна.

Заключение

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

Оцените материал
Добавить комментарий

Капча загружается...