Khi nhiều người làm việc trên nhiều bản trình bày PowerPoint^{(PowerPoint presentations)} và sau đó cần kết hợp chúng lại với nhau, điều đó trở nên khó khăn. Lý do chính là sự định hình. Nếu các đội không đồng bộ với nhau, việc đưa họ về cùng một thể thức sẽ trở thành một công việc khó khăn.

Microsoft PowerPoint cung cấp một giải pháp nội bộ giống như Word và Excel , cho phép bạn hợp nhất nhiều bản trình bày PowerPoint và vẫn giữ nguyên định dạng. Cách đúng để làm điều này là yêu cầu mọi người sử dụng cùng một chủ đề. Đảm^(Make) bảo thiết lập Chủ đề PowerPoint^{(PowerPoint Theme)} trong một tệp, sau đó chia sẻ nó với mọi người.

Cách kết hợp nhiều bản trình bày PowerPoint^{(Multiple PowerPoint)}

Chúng tôi có ba cách để hợp nhất nhiều tệp PowerPoint . Mặc dù cách đầu tiên là tốt khi bạn có ít số hơn, và giữ nguyên định dạng là mục tiêu chính. Thứ hai có thể kết hợp bất kỳ số lượng tệp nào có sẵn trong một thư mục.

Sử dụng lại phương pháp trang trình bày
Phương pháp mã VBA
Sao chép Dán các Trang trình bày.

Mỗi phương pháp đều có ưu điểm và nhược điểm của nó. Hãy lựa chọn^(Choose) một cách khôn ngoan.

1] Sử dụng lại phương pháp trang trình bày

Cách kết hợp nhiều bản trình bày PowerPoint

Microsoft PowerPoint cung cấp một công cụ có sẵn— Sử dụng lại Trang trình bày. ^{(Reuse Slides.)}Nó cho phép bạn nhập một hoặc nhiều trang trình bày vào bản trình bày của mình từ một trang khác mà không cần phải mở tệp khác. Khi bạn sử dụng tùy chọn này, hãy đảm bảo chọn tùy chọn định dạng, đặc biệt nếu bạn muốn có cùng chủ đề với tệp nguồn.

Mở tệp Powerpoint^(Powerpoint) mới hoặc tệp hiện có mà bạn muốn hợp nhất các trang chiếu.
Chọn trang chiếu mà sau đó bạn muốn chèn các trang chiếu từ tệp nguồn.
Đi tới Home > New Slide > Reuse Slide.
Duyệt qua^(Browse) để chọn tệp bạn muốn hợp nhất. Sau đó bấm vào nút mũi tên.
Nó sẽ hiển thị tất cả các mặt có sẵn trên trang trình bày đó.
Nhấp^(Click) vào trang chiếu bạn muốn chèn và nó sẽ được thêm ngay vào trang chiếu.
Nếu bạn muốn giữ định dạng chính xác như trang trình bày nguồn, hãy chọn hộp có nội dung “ Giữ định dạng nguồn^{(Keep source formatting)} ”.

Bất kỳ trang trình bày nào bạn thêm vào đây đều là một bản sao. Tệp nguồn vẫn còn nguyên vẹn và sẽ không có thay đổi nào đối với nó. Bất kỳ thay đổi nào bạn thực hiện trong tài liệu đã hợp nhất sẽ không có sẵn trong tệp gốc.

Một trong những phần tốt nhất của việc nhập bằng phương pháp này là nó sẽ giữ tất cả các hoạt ảnh hoặc chuyển tiếp. ^{(it will keep all animations or transitions.)}Đó không phải là trường hợp trước đó, và người ta phải sử dụng phương thức Đối tượng^{(use the Object method)} , sau đó là nhiều cấu hình để làm cho nó hoạt động. Phương thức Đối tượng^{(Object Method)} chỉ hữu ích nếu bạn muốn đóng gói nhiều tệp thành một.

2] Phương pháp mã VBA

Vì không có phương pháp gốc nào để hợp nhất nhiều Bản trình bày PowerPoint^{(PowerPoint Presentations)} , chúng tôi sẽ phải sử dụng mã VBA , giống như cách chúng tôi đã làm để hợp nhất các tệp Excel . Nó thẳng về phía trước và hoạt động tốt hơn so với mã VBA mà chúng tôi đã sử dụng cho Excel . Mã hoạt động tốt đối với tôi và tôi có thể hợp nhất 3 tệp PowerPoint trị giá 60 trang trình bày.

Hợp nhất nhiều bản trình bày bằng mã VBA

Trong tệp PowerPoint^(PowerPoint) mới hoặc hiện có mà bạn muốn hợp nhất tất cả các bản trình bày, hãy nhấn ALT + F11

Nhấp^(Click) vào Insert > Module và dán mã bên trong mô-đun đó. Đừng bận tâm lưu nó.

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

Thực hiện các thay đổi mà tôi đã đánh dấu là in đậm.

Nhấn F5^{(Press F5)} và nó sẽ thực thi mã

Nó sẽ nhập tất cả các slide từ tất cả các tệp có sẵn trong thư mục đó. Tuy nhiên, nó sẽ làm mất định dạng. Đó là vấn đề lớn nhất với mã, nhưng nó có thể hợp nhất bất kỳ số lượng tệp nào, đó là lợi thế quan trọng nhất của nó. Đảm^(Make) bảo xóa mã VBA sau khi quá trình nhập hoàn tất. Mã là của PPTFAQ.c0m.^{(by PPTFAQ.c0m.)}

3] Sao chép các trang trình bày, dán

Giữ định dạng nguồn Bản trình bày PowerPoint

Đôi khi tôi sử dụng tính năng này khi có nhiều tệp, thường ít hơn ba tệp và tôi chỉ cần sao chép một vài trang trình bày từ chúng. Mặc dù bạn có thể sử dụng Ctrl + C và Ctrl + V , nhưng bạn sẽ mất định dạng. Vì vậy, sau khi bạn sao chép trang trình bày, hãy nhấp chuột phải vào phần danh sách trang trình bày của tệp đích và chọn giữ nguyên định dạng.

Tôi hy vọng tất cả các phương pháp này đều dễ làm theo và bạn có thể hợp nhất nhiều tệp PowerPoint .

Đảm^(Make) bảo chọn giữa số lượng tệp để hợp nhất và Chủ đề^(Theme) của trang chiếu theo nhu cầu của bạn.

Đọc tiếp theo^{(Read next)} : Cách Hợp nhất Tài liệu Word^{(How to Merge Word Documents)} .

How to merge multiple PowerPoint Presentations into one

When a lot of people work on multіple 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.

Oanh Tuyết

About the author

Tôi là một chuyên gia máy tính và đã làm việc với máy tính trong nhiều năm. Tôi có kinh nghiệm với cả Apple iPhone và Microsoft Windows 10. Các kỹ năng của tôi bao gồm: sử dụng máy tính để tạo, mã hóa và lưu trữ dữ liệu; tìm và sửa lỗi trong phần mềm; và khắc phục sự cố. Tôi am hiểu mọi lĩnh vực sử dụng máy tính, bao gồm Apple iOS, Microsoft Windows 10, bảo vệ chống ransomware, v.v. Tôi tin tưởng rằng các kỹ năng của tôi sẽ có giá trị đối với doanh nghiệp hoặc tổ chức của bạn.

Cách hợp nhất nhiều Bản trình bày PowerPoint thành một

Cách kết hợp nhiều bản trình bày PowerPoint^{(Multiple PowerPoint)}