Quando muitas pessoas trabalham em várias apresentações do PowerPoint^{(PowerPoint presentations)} e precisam mesclá-las no final, torna-se um desafio. O principal motivo é a formatação. Se as equipes não estiverem sincronizadas umas com as outras, será um trabalho doloroso trazê-las para o mesmo formato.

O Microsoft PowerPoint^{(Microsoft PowerPoint)} oferece uma solução interna, assim como o Word e o Excel , que permite mesclar várias apresentações do PowerPoint e ainda manter a formatação intacta. A maneira correta de fazer isso é pedir a todos que usem o mesmo tema. Certifique^(Make) -se de configurar o tema do PowerPoint^{(PowerPoint Theme)} em um arquivo e compartilhá-lo com todos.

Como mesclar várias^{(Multiple PowerPoint)} apresentações do PowerPoint

Temos três maneiras de mesclar vários arquivos do PowerPoint . Enquanto o primeiro é bom quando você tem menos números, e preservar a formatação é o objetivo principal. O segundo pode combinar qualquer número de arquivos disponíveis em uma pasta.

1. Método de reutilização de slides
2. Método de código VBA
3. Copiar e colar slides.

Cada método tem sua vantagem e desvantagem. Escolha^(Choose) sabiamente.

1] Método de reutilização de slides

O Microsoft PowerPoint^{(Microsoft PowerPoint)} oferece uma ferramenta integrada — Reutilizar Slides. ^{(Reuse Slides.)}Ele permite que você importe um ou vários slides para sua apresentação de outro, sem precisar abrir o outro arquivo. Ao usar essa opção, certifique-se de escolher a opção de formatação, principalmente se desejar ter o mesmo tema do arquivo de origem.

1. Abra um novo arquivo do PowerPoint ou um existente onde você deseja mesclar os slides.
2. Selecione o slide após o qual você deseja inserir os slides do arquivo de origem.
3. Vá para Home > New Slide > Reuse Slide.
4. Navegue^(Browse) para selecionar o arquivo que você deseja mesclar. Em seguida, clique no botão de seta.
5. Ele irá revelar todos os lados disponíveis nesse slide.
6. Clique^(Click) no slide que deseja inserir e ele será adicionado instantaneamente ao slide.
7. Se você deseja manter o formato exatamente como o slide de origem, marque a caixa que diz " Manter formatação de origem^{(Keep source formatting)} ".

Qualquer slide que você adicionar aqui é uma cópia. O arquivo de origem permanece intacto e nenhuma alteração será feita nele. Qualquer alteração feita no documento mesclado não ficará disponível no arquivo original.

Uma das melhores partes da importação usando esse método é que ele manterá todas as animações ou transições. ^{(it will keep all animations or transitions.)}Não era o caso antes, e era preciso usar o método Object^{(use the Object method)} , seguido de várias configurações para fazê-lo funcionar. Object Method só é útil se você quiser empacotar vários arquivos em um.

2] Método de código VBA

Como não existe um método nativo para mesclar várias apresentações do PowerPoint^{(PowerPoint Presentations)} , teremos que usar um código VBA , assim como fizemos para mesclar arquivos do Excel^(Excel) . É simples e funciona melhor em comparação com o código VBA que usamos para o Excel . O código funcionou bem para mim e consegui mesclar 3 arquivos do PowerPoint no valor de 60 slides.

No arquivo PowerPoint^(PowerPoint) novo ou existente onde você deseja mesclar todas as apresentações, pressione ALT + F11

Clique^(Click) em Insert > Module e cole o código dentro desse módulo. Não se preocupe em salvá-lo.

Sub InsertAllSlides()
'  Insert all slides from all presentations in the same folder as this one
'  INTO this one; do not attempt to insert THIS file into itself, though.

    Dim vArray() As String
    Dim x As Long

    ' Change "*.PPT" to "*.PPTX" or whatever if necessary:
    EnumerateFiles ActivePresentation.Path & "C:\PathtoSlidesYouWanttoImport", "*.PPT", vArray

    With ActivePresentation
        For x = 1 To UBound(vArray)
            If Len(vArray(x)) > 0 Then
                .Slides.InsertFromFile vArray(x), .Slides.Count
            End If
        Next
    End With

End Sub

Sub EnumerateFiles(ByVal sDirectory As String, _
    ByVal sFileSpec As String, _
    ByRef vArray As Variant)
    ' collect all files matching the file spec into vArray, an array of strings

    Dim sTemp As String
    ReDim vArray(1 To 1)

    sTemp = Dir$(sDirectory & sFileSpec)
    Do While Len(sTemp) > 0
        ' NOT the "mother ship" ... current presentation
        If sTemp <> ActivePresentation.Name Then
            ReDim Preserve vArray(1 To UBound(vArray) + 1)
            vArray(UBound(vArray)) = sDirectory & sTemp
        End If
        sTemp = Dir$
    Loop

End Sub

Faça as alterações que marquei como negrito.

Pressione F5^{(Press F5)} e ele executará o código

Ele importará todos os slides de todos os arquivos disponíveis nessa pasta. No entanto, ele perderá a formatação. Esse é o maior problema com o código, mas ele pode mesclar qualquer número de arquivos, que é sua vantagem mais significativa.  Certifique^(Make) -se de remover o código VBA assim que a importação for concluída. ^(VBA)O código é de PPTFAQ.c0m.^{(by PPTFAQ.c0m.)}

3] Copiar e colar slides

Eu uso isso às vezes quando há vários arquivos, geralmente menos de três, e preciso copiar apenas alguns slides deles. Embora você possa usar Ctrl + C e Ctrl + V , mas perderá a formatação. Então, depois de copiar o slide, clique com o botão direito do mouse na seção da lista de slides do arquivo de destino e selecione manter o formato.

Espero que todos esses métodos tenham sido fáceis de seguir e que você tenha conseguido mesclar vários arquivos do PowerPoint .

Certifique^(Make) -se de escolher entre o número de arquivos a serem mesclados e o tema^(Theme) do slide conforme sua necessidade.

Leia a seguir^{(Read next)} : Como mesclar documentos do Word^{(How to Merge Word Documents)} .

How to merge multiple PowerPoint Presentations into one

When a lot of people wоrk on multiple PowerPoint presentations and then need to merge them in the end, it becomes challenging. The primary reason is the formating. If the teams are not in sync with each other, it will become a painful job to bring them to the same format.

Microsoft PowerPoint offers an in-house solution just like Word and Excel, which will allow you to merge multiple PowerPoint presentations, and still keep the formatting intact. The right way to do this is to ask everyone to use the same theme. Make sure to set up the PowerPoint Theme in one file, and then share it with everyone.

How to Merge Multiple PowerPoint Presentations

We have three ways to merge multiple PowerPoint files. While the first one is good when you have fewer numbers, and preserving the formatting is the primary goal. The second can combine any number of files available in a folder.

1. Reuse Slides Method
2. VBA Code Method
3. Copy Paste Slides.

Each method has its advantage and drawback. Choose wisely.

1] Reuse Slides Method

Microsoft PowerPoint offers an inbuilt tool— Reuse Slides. It allows you to import single or multiple slides to your presentation from another, without having to open the other file. When you use this option, make sure to choose the option for formatting, especially if you want to have the same theme as the source file.

1. Open a new Powerpoint file or existing one where you want to merge the slides.
2. Select the slide after which you want to insert the slides from the source file.
3. Go to Home > New Slide > Reuse Slide.
4. Browse to select the file which you want to merge. Then click on the arrow button.
5. It will reveal all the sides available on that slide.
6. Click on the slide you want to insert, and it will be instantly added to the slide.
7. If you want to keep the format exactly as the source slide, check the box which says, “Keep source formatting.”

Any slide you add here is a copy. The source file remains intact, and no changes will be made to it. Any change you make in the merged document will not become available in the original file.

One of the best parts of importing using this method is that it will keep all animations or transitions. It wasn’t the case earlier, and one had to use the Object method, followed by multiple configurations to make it work. Object Method is only useful if you want to pack multiple files into one.

2] VBA Code Method

Since there is no native method to merge numerous PowerPoint Presentations, we will have to use a VBA code, just like how we did to merge Excel files. It is straight forward and works better compared to the VBA code we used for Excel. The code worked fine for me well, and I was able to merge 3 PowerPoint files worth 60 slides.

In the new or existing PowerPoint file where you want to merge all the presentations, press ALT + F11

Click in Insert > Module and paste the code inside that module. Do not bother saving it.

Sub InsertAllSlides()
'  Insert all slides from all presentations in the same folder as this one
'  INTO this one; do not attempt to insert THIS file into itself, though.

    Dim vArray() As String
    Dim x As Long

    ' Change "*.PPT" to "*.PPTX" or whatever if necessary:
    EnumerateFiles ActivePresentation.Path & "C:\PathtoSlidesYouWanttoImport", "*.PPT", vArray

    With ActivePresentation
        For x = 1 To UBound(vArray)
            If Len(vArray(x)) > 0 Then
                .Slides.InsertFromFile vArray(x), .Slides.Count
            End If
        Next
    End With

End Sub

Sub EnumerateFiles(ByVal sDirectory As String, _
    ByVal sFileSpec As String, _
    ByRef vArray As Variant)
    ' collect all files matching the file spec into vArray, an array of strings

    Dim sTemp As String
    ReDim vArray(1 To 1)

    sTemp = Dir$(sDirectory & sFileSpec)
    Do While Len(sTemp) > 0
        ' NOT the "mother ship" ... current presentation
        If sTemp <> ActivePresentation.Name Then
            ReDim Preserve vArray(1 To UBound(vArray) + 1)
            vArray(UBound(vArray)) = sDirectory & sTemp
        End If
        sTemp = Dir$
    Loop

End Sub

Make the changes that I have marked as bold.

Press F5, and it will execute the code

It will import all the slides from all the files available in that folder. However, it will lose the formating. That is the biggest problem with the code, but it can merge any number of files, which is its most significant advantage.  Make sure to remove the VBA code once the import is complete. The code is by PPTFAQ.c0m.

3] Copy Paste Slides

I use this sometimes when there are multiple files, usually less than three, and I need to copy only a few slides from them. While you can use Ctrl + C and Ctrl + V, but you will lose formatting. So after you copy the slide, right-click on the slide list section of the destination file and select keep the format.

I hope all these methods were easy to follow, and you were able to merge multiple PowerPoint files.

Make sure to choose between the number of files to merge and the Theme of the slide as per your need.

Read next: How to Merge Word Documents.

Related posts

• Como alterar o tamanho do slide no PowerPoint para apresentações melhores

• Como borrar uma foto no PowerPoint

• Excel, Word or PowerPoint não pôde começar a última vez

• Como vincular um PowerPoint presentation a outro

• PowerPoint não está respondendo, congelamento, enforcamento ou parou de funcionar

• Como compactar um PowerPoint file no Windows 10

• Como comprimir todas as fotos em um PowerPoint presentation

• Convert Word, PowerPoint, Excel Documents em PDF usando Google Docs

• Como fazer um Mind Map em Microsoft PowerPoint

• Como habilitar e mesclar Shapes em PowerPoint

• Como vincular elementos, Content or Objects para um PowerPoint slide

• Como criar um Timeline em PowerPoint

• Como borrar parte de um quadro com PowerPoint

• Como travessão e alinhar Bullet Points em PowerPoint

• Como criar e inserir um Pyramid em PowerPoint

• Aumentar o número de arquivos recentes em Word, Excel, PowerPoint

• Como criar um Org chart no PowerPoint

• Como corrigir o PowerPoint não pode salvar file error

• Como mudar o Slide size and orientation no PowerPoint

• Como criar um Photo Album em PowerPoint