Wenn viele Leute an mehreren PowerPoint-Präsentationen^{(PowerPoint presentations)} arbeiten und sie am Ende zusammenführen müssen, wird es schwierig. Der Hauptgrund ist die Formatierung. Wenn die Teams nicht miteinander synchron sind, wird es eine mühsame Aufgabe, sie auf dasselbe Format zu bringen.

Microsoft PowerPoint bietet eine interne Lösung, genau wie Word und Excel , mit der Sie mehrere PowerPoint - Präsentationen zusammenführen und die Formatierung dennoch beibehalten können. Der richtige Weg, dies zu tun, besteht darin, alle zu bitten, dasselbe Thema zu verwenden. Stellen Sie sicher, dass Sie das ^(Make)PowerPoint^{(PowerPoint Theme)} -Design in einer Datei einrichten und es dann für alle freigeben.

So führen Sie mehrere PowerPoint-^{(Multiple PowerPoint)} Präsentationen zusammen

Wir haben drei Möglichkeiten, mehrere PowerPoint- Dateien zusammenzuführen. Während der erste gut ist, wenn Sie weniger Zahlen haben, ist die Beibehaltung der Formatierung das Hauptziel. Die zweite kann eine beliebige Anzahl von Dateien in einem Ordner kombinieren.

Methode zur Wiederverwendung von Folien
VBA-Code-Methode
Folien kopieren und einfügen.

Jede Methode hat ihre Vor- und Nachteile. Wähle^(Choose) weise.

1] Methode zur Wiederverwendung von Folien

So führen Sie mehrere PowerPoint-Präsentationen zusammen

Microsoft PowerPoint bietet ein integriertes Tool – Folien wiederverwenden. ^{(Reuse Slides.)}Sie können einzelne oder mehrere Folien aus einer anderen in Ihre Präsentation importieren, ohne die andere Datei öffnen zu müssen. Wenn Sie diese Option verwenden, stellen Sie sicher, dass Sie die Option für die Formatierung auswählen, insbesondere wenn Sie dasselbe Design wie die Quelldatei haben möchten.

Öffnen Sie eine neue oder eine vorhandene PowerPoint -Datei, in der Sie die Folien zusammenführen möchten.
Wählen Sie die Folie aus, nach der Sie die Folien aus der Quelldatei einfügen möchten.
Gehen Sie zu Home > New Slide > Reuse Slide.
Suchen^(Browse) Sie nach der Datei, die Sie zusammenführen möchten. Klicken Sie dann auf die Pfeilschaltfläche.
Es werden alle auf dieser Folie verfügbaren Seiten angezeigt.
Klicken Sie^(Click) auf die Folie, die Sie einfügen möchten, und sie wird sofort zur Folie hinzugefügt.
Wenn Sie das Format genau wie auf der Quellfolie beibehalten möchten, aktivieren Sie das Kontrollkästchen „ Quellformatierung beibehalten^{(Keep source formatting)} “.

Jede Folie, die Sie hier hinzufügen, ist eine Kopie. Die Quelldatei bleibt intakt und es werden keine Änderungen daran vorgenommen. Alle Änderungen, die Sie im zusammengeführten Dokument vornehmen, werden in der Originaldatei nicht verfügbar.

Einer der besten Aspekte beim Importieren mit dieser Methode ist, dass alle Animationen oder Übergänge erhalten bleiben. ^{(it will keep all animations or transitions.)}Früher war das nicht der Fall, und man musste die Object-Methode verwenden^{(use the Object method)} , gefolgt von mehreren Konfigurationen, damit es funktionierte. Die Objektmethode^{(Object Method)} ist nur nützlich, wenn Sie mehrere Dateien in eine packen möchten.

2] VBA-Code-Methode

Da es keine native Methode zum Zusammenführen zahlreicher PowerPoint-Präsentationen^{(PowerPoint Presentations)} gibt, müssen wir einen VBA -Code verwenden, genau wie beim Zusammenführen von Excel - Dateien. Es ist unkompliziert und funktioniert besser als der VBA -Code, den wir für Excel verwendet haben . Der Code funktionierte gut für mich, und ich konnte 3 PowerPoint - Dateien im Wert von 60 Folien zusammenführen.

Mehrere Präsentationen mit VBA-Code zusammenführen

Drücken Sie in der neuen oder vorhandenen PowerPoint -Datei, in der Sie alle Präsentationen zusammenführen möchten, ALT + F11

Klicken Sie^(Click) auf Insert > Module und fügen Sie den Code in dieses Modul ein. Kümmern Sie sich nicht darum, es zu speichern.

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

Nehmen Sie die Änderungen vor, die ich als fett markiert habe.

Drücken Sie F5^{(Press F5)} und der Code wird ausgeführt

Es importiert alle Folien aus allen Dateien, die in diesem Ordner verfügbar sind. Allerdings geht dabei die Formatierung verloren. Das ist das größte Problem mit dem Code, aber er kann eine beliebige Anzahl von Dateien zusammenführen, was sein größter Vorteil ist. Stellen Sie^(Make) sicher, dass Sie den VBA -Code entfernen, sobald der Import abgeschlossen ist. Der Code stammt von PPTFAQ.c0m.^{(by PPTFAQ.c0m.)}

3] Folien kopieren und einfügen

Quellformatierung der PowerPoint-Präsentation beibehalten

Ich verwende dies manchmal, wenn es mehrere Dateien gibt, normalerweise weniger als drei, und ich nur ein paar Folien daraus kopieren muss. Sie können zwar Ctrl + C und Ctrl + V verwenden , aber Sie verlieren die Formatierung. Nachdem Sie die Folie kopiert haben, klicken Sie mit der rechten Maustaste auf den Folienlistenabschnitt der Zieldatei und wählen Sie „Format beibehalten“.

Ich hoffe, all diese Methoden waren einfach zu befolgen, und Sie konnten mehrere PowerPoint- Dateien zusammenführen.

Stellen Sie^(Make) sicher, dass Sie je nach Bedarf zwischen der Anzahl der zusammenzuführenden Dateien und dem Thema der Folie wählen.^(Theme)

Lesen Sie weiter^{(Read next)} : So führen Sie Word-Dokumente zusammen^{(How to Merge Word Documents)} .

How to merge multiple PowerPoint Presentations into one

When a lot of people work on multiрle 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.

Reuse Slides Method
VBA Code Method
Copy Paste Slides.

Each method has its advantage and drawback. Choose wisely.

1] Reuse Slides Method

How to merge multiple PowerPoint Presentations

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.

Open a new Powerpoint file or existing one where you want to merge the slides.
Select the slide after which you want to insert the slides from the source file.
Go to Home > New Slide > Reuse Slide.
Browse to select the file which you want to merge. Then click on the arrow button.
It will reveal all the sides available on that slide.
Click on the slide you want to insert, and it will be instantly added to the slide.
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.

Merge Multiple Presentation using VBA Code

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

Keep Source Formatting PowerPoint Presentation

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.

Wanda Engel

About the author

Ich bin Freeware-Softwareentwickler und Befürworter von Windows Vista/7. Ich habe mehrere hundert Artikel zu verschiedenen Themen rund um das Betriebssystem geschrieben, darunter Tipps und Tricks, Reparaturanleitungen und Best Practices. Über mein Unternehmen Help Desk Services biete ich auch bürobezogene Beratungsdienste an. Ich habe ein tiefes Verständnis dafür, wie Office 365 funktioniert, welche Funktionen es gibt und wie man sie am effektivsten einsetzt.

So führen Sie mehrere PowerPoint-Präsentationen zu einer zusammen

So führen Sie mehrere PowerPoint-^{(Multiple PowerPoint)} Präsentationen zusammen