Cuando muchas personas trabajan en múltiples presentaciones de PowerPoint^{(PowerPoint presentations)} y luego necesitan fusionarlas al final, se vuelve un desafío. La razón principal es el formateo. Si los equipos no están sincronizados entre sí, será un trabajo doloroso llevarlos al mismo formato.

Microsoft PowerPoint ofrece una solución interna como Word y Excel , que le permitirá fusionar múltiples presentaciones de PowerPoint y aún así mantener el formato intacto. La forma correcta de hacer esto es pedirles a todos que usen el mismo tema. Asegúrese^(Make) de configurar el tema de PowerPoint^{(PowerPoint Theme)} en un archivo y luego compártalo con todos.

Cómo fusionar varias presentaciones de PowerPoint^{(Multiple PowerPoint)}

Tenemos tres formas de fusionar varios archivos de PowerPoint . Mientras que el primero es bueno cuando tiene menos números, y el objetivo principal es preservar el formato. El segundo puede combinar cualquier número de archivos disponibles en una carpeta.

1. Método de reutilización de diapositivas
2. Método de código VBA
3. Copiar Pegar Diapositivas.

Cada método tiene sus ventajas y desventajas. Elija^(Choose) sabiamente.

1] Método de reutilización de diapositivas

Microsoft PowerPoint ofrece una herramienta integrada: Reutilizar diapositivas. ^{(Reuse Slides.)}Le permite importar una o varias diapositivas a su presentación desde otra, sin tener que abrir el otro archivo. Cuando utilice esta opción, asegúrese de elegir la opción de formato, especialmente si desea tener el mismo tema que el archivo de origen.

1. Abra un nuevo archivo de PowerPoint o uno existente en el que desee fusionar las diapositivas.
2. Seleccione la diapositiva después de la cual desea insertar las diapositivas del archivo de origen.
3. Vaya a Home > New Slide > Reuse Slide.
4. Examine^(Browse) para seleccionar el archivo que desea fusionar. Luego haga clic en el botón de la flecha.
5. Revelará todos los lados disponibles en esa diapositiva.
6. Haga clic^(Click) en la diapositiva que desea insertar y se agregará instantáneamente a la diapositiva.
7. Si desea mantener el formato exactamente como la diapositiva de origen, marque la casilla que dice " Mantener el formato de origen^{(Keep source formatting)} ".

Cualquier diapositiva que agregue aquí es una copia. El archivo de origen permanece intacto y no se realizarán cambios en él. Cualquier cambio que realice en el documento fusionado no estará disponible en el archivo original.

Una de las mejores partes de importar usando este método es que mantendrá todas las animaciones o transiciones. ^{(it will keep all animations or transitions.)}No era el caso antes, y uno tenía que usar el método Object^{(use the Object method)} , seguido de múltiples configuraciones para que funcionara. Object Method solo es útil si desea empaquetar varios archivos en uno.

2] Método de código VBA

Dado que no existe un método nativo para fusionar numerosas presentaciones de PowerPoint^{(PowerPoint Presentations)} , tendremos que usar un código VBA , tal como lo hicimos para fusionar archivos de Excel . Es sencillo y funciona mejor en comparación con el código VBA que usamos para Excel . El código funcionó bien para mí y pude fusionar 3 archivos de PowerPoint con un valor de 60 diapositivas.

En el archivo de PowerPoint^(PowerPoint) nuevo o existente donde desea fusionar todas las presentaciones, presione ALT + F11

Haga clic^(Click) en Insert > Module y pegue el código dentro de ese módulo. No te molestes en guardarlo.

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

Haz los cambios que he marcado en negrita.

Presiona F5^{(Press F5)} y ejecutará el código

Importará todas las diapositivas de todos los archivos disponibles en esa carpeta. Sin embargo, perderá el formateo. Ese es el mayor problema con el código, pero puede fusionar cualquier cantidad de archivos, lo cual es su ventaja más significativa.  Asegúrese^(Make) de eliminar el código VBA una vez que se complete la importación. ^(VBA)El código es de PPTFAQ.c0m.^{(by PPTFAQ.c0m.)}

3] Copiar y pegar diapositivas

Lo uso a veces cuando hay varios archivos, generalmente menos de tres, y necesito copiar solo algunas diapositivas de ellos. Si bien puede usar Ctrl + C y Ctrl + V , perderá el formato. Entonces, después de copiar la diapositiva, haga clic con el botón derecho en la sección de la lista de diapositivas del archivo de destino y seleccione mantener el formato.

Espero que todos estos métodos hayan sido fáciles de seguir y que haya podido fusionar varios archivos de PowerPoint .

Asegúrese^(Make) de elegir entre la cantidad de archivos para fusionar y el tema^(Theme) de la diapositiva según sus necesidades.

Lea a continuación^{(Read next)} : Cómo combinar documentos de Word^{(How to Merge Word Documents)} .

How to merge multiple PowerPoint Presentations into one

When a lot of peоple work 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

• Cómo cambiar el tamaño de la diapositiva en PowerPoint para mejores presentaciones

• Cómo difuminar una imagen en PowerPoint

• Excel, Word or PowerPoint no podía comenzar la última vez

• Cómo vincular una PowerPoint presentation a otra

• PowerPoint no está respondiendo, congelando, colgando o ha dejado de funcionar

• Cómo crear un Timeline en PowerPoint

• Cómo comprimir todas las imágenes en un PowerPoint presentation

• Cómo arreglar el PowerPoint no puede guardar file error

• Cómo formatear y cambiar Slide layout en PowerPoint a la vez

• Best PowerPoint gratis a Image converter software and online tools

• Cómo cambiar File Format predeterminada para guardar en Word, Excel, PowerPoint

• Cómo hacer un Flowchart en PowerPoint

• Convert PDF a PPT (PowerPoint) Utilizando estos software & online tools gratis

• Cómo crear un Mouseover Text Effect en PowerPoint

• Cómo crear e insertar un Pyramid en PowerPoint

• Cómo crear un Venn Diagram en PowerPoint

• Cómo crear un Design Preset o un tema en PowerPoint

• Cómo sangrar y alinear Bullet Points en PowerPoint

• Cómo dividir una imagen en pedazos en PowerPoint

• Cómo Compare and Merge PowerPoint Presentations