Início / computer / Perguntas / 1520908
Accepted
NotepadPlusPlus PRO
Asked: 2020-01-29 11:19:24 +0800 CST

Converter slides do PowerPoint em infográficos individuais

  • 772

Infográficos são representações visuais gráficas de informações, dados ou conhecimento destinados a apresentar informações de forma rápida e clara.

Eu tenho uma apresentação do PowerPoint com cerca de 8 a 10 slides, esses slides são bem formatados com visualizações muito boas. Eu gostaria de convertê-los todos em uma única grande imagem de infográfico?

insira a descrição da imagem aqui

Alguém sabe como fazer isso? Eu sei como converter slides individuais em uma imagem e então posso mesclá-los todos juntos em uma única imagem vertical. Mas é meio tedioso.

Existe uma maneira de fazer isso automaticamente?

Obrigado.

microsoft-powerpoint presentations

2 respostas

  1. Não consigo pensar em uma maneira de criar uma grande imagem vertical de todos os slides, mas como uma solução alternativa para obter as capturas de tela de todos os slides em um único slide, você pode usar a função de zoom.

    Você pode ir para Inserir --> Zoom --> Zoom de Resumo. Selecione todos os slides e clique em Inserir. Isso fornece uma seção com um único slide com as capturas de tela de todos os slides. Você pode redimensioná-los para caber e exportar este único slide como um png.

    Isso não daria a você uma imagem grande, a imagem seria do mesmo tamanho do slide, mas você pode alterar as dimensões do PowerPoint proporcionalmente e usar maximizar para aumentar proporcionalmente sem afetar nenhum elemento nos slides. Você pode fazer isso antes de executar a etapa de zoom de resumo acima. Isso pode lhe dar uma imagem maior.

    • 0
  2. Best Answer

    Só vi isso hoje por algum motivo.

    Vou colar um pouco de VBA abaixo que fará o trabalho para você. Ele cria uma segunda apresentação com a altura da apresentação original * número de slides no original e, em seguida, cola uma cópia de cada slide original no slide da nova apresentação, um empilhado ordenadamente sobre o outro, em ordem.

    Uma ressalva: o PPT não criará slides com mais de 56" em nenhuma dimensão, portanto, certifique-se de que seus slides não causem um estouro. Não me preocupei em testar isso no 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) ' Blank slide

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
    • 0

relate perguntas