Cách kết hợp nhiều bản trình bày PowerPoint
Khi nhiều người làm việc trên nhiều Bản trình bày PowerPoint và sau đó cần phải hợp nhất 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 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 bảo thiết lập Chủ đề PowerPoint trong một tệp và 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
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 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. Chọn một cách khôn ngoan.
1 :Sử dụng lại phương pháp trang trình bày
Microsoft PowerPoint cung cấp một công cụ có sẵn— Sử dụng lại Trang trình bày. 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 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 đến Trang chủ> Trang trình bày mới> Sử dụng lại trang trình bày.
- Duyệt để 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 slide đó.
- Bấm 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. ”
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 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. không phải là trường hợp trước đó, và người ta phải sử dụng phương pháp Đối tượng, tiếp theo là nhiều cấu hình để làm cho nó hoạt động. Phương thức Đối tượng 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, 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.
- Nhấp chuột phải không hoạt động trên trình duyệt Firefox hoặc Chrome
- Top 4 công cụ tìm kiếm và nhận diện khuôn mặt Online [MIỄN PHÍ]
Trong tệp 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 vào Chèn> Mô-đun 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 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 bảo xóa mã VBA sau khi quá trình nhập hoàn tất. Mã là bởi PPTFAQ.c0m.
3 :Sao chép các trang trình bày, dán
Đôi khi tôi sử dụng điều 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 bảo chọn giữa số lượng tệp để hợp nhất và Chủ đề của trang chiếu theo nhu cầu của bạn.
Đọc tiếp: Cách hợp nhất tài liệu Word.
- Thẻ: PowerPoint