Kako spojiti više PowerPoint prezentacija u jednu

Kada puno ljudi radi na više PowerPoint prezentacija(PowerPoint presentations) , a zatim ih na kraju treba spojiti, to postaje izazovno. Glavni razlog je formatiranje. Ako timovi nisu međusobno usklađeni, bit će bolan posao dovesti ih u isti format.

Microsoft PowerPoint nudi interno rješenje poput Worda(Word) i Excela(Excel) , koje će vam omogućiti spajanje više PowerPoint prezentacija, a da pritom formatiranje ostane netaknuto. Pravi način da to učinite je da zamolite sve da koriste istu temu. Obavezno(Make) postavite PowerPoint temu(PowerPoint Theme) u jednu datoteku, a zatim je podijelite sa svima.

Kako spojiti više PowerPoint(Multiple PowerPoint) prezentacija

Imamo tri načina za spajanje više PowerPoint datoteka. Dok je prvi dobar kada imate manje brojeva, a očuvanje oblikovanja je primarni cilj. Drugi može kombinirati bilo koji broj datoteka dostupnih u mapi.

  1. Ponovno upotrijebite metodu slajdova
  2. Metoda VBA koda
  3. Kopiraj i zalijepi slajdove.

Svaka metoda ima svoje prednosti i nedostatke. Birajte(Choose) mudro.

1] Ponovno upotrijebite metodu slajdova

Kako spojiti više PowerPoint prezentacija

Microsoft PowerPoint nudi ugrađeni alat — ponovno korištenje slajdova. (Reuse Slides.)Omogućuje vam uvoz jednog ili više slajdova u svoju prezentaciju iz druge, bez otvaranja druge datoteke. Kada koristite ovu opciju, svakako odaberite opciju za formatiranje, osobito ako želite imati istu temu kao izvorna datoteka.

  1. Otvorite novu Powerpoint datoteku ili postojeću u koju želite spojiti slajdove.
  2. Odaberite slajd nakon kojeg želite umetnuti slajdove iz izvorne datoteke.
  3. Idite na Home > New Slide > Reuse Slide.
  4. Pregledajte(Browse) da biste odabrali datoteku koju želite spojiti. Zatim kliknite na gumb sa strelicom.
  5. Otkrit će sve strane dostupne na tom slajdu.
  6. Kliknite(Click) na slajd koji želite umetnuti i on će se odmah dodati na slajd.
  7. Ako želite zadržati format točno kao izvorni slajd, označite okvir koji kaže " Zadrži izvorno formatiranje(Keep source formatting) ".

Svaki slajd koji ovdje dodate je kopija. Izvorna datoteka ostaje netaknuta i na njoj se neće unositi nikakve promjene. Svaka promjena koju napravite u spojenom dokumentu neće postati dostupna u izvornoj datoteci.

Jedan od najboljih dijelova uvoza pomoću ove metode je taj što će zadržati sve animacije ili prijelaze. (it will keep all animations or transitions.)Ranije to nije bio slučaj i trebalo je koristiti metodu Object(use the Object method) , nakon čega je slijedilo više konfiguracija da bi ona funkcionirala. Objektna metoda(Object Method) je korisna samo ako želite spakirati više datoteka u jednu.

2] Metoda VBA koda

Budući da ne postoji izvorna metoda za spajanje brojnih PowerPoint prezentacija(PowerPoint Presentations) , morat ćemo koristiti VBA kod, baš kao što smo to učinili za spajanje Excel datoteka. Izravan je i radi bolje u usporedbi s VBA kodom koji smo koristili za Excel . Kod mene je dobro funkcionirao i uspio sam spojiti 3 PowerPoint datoteke vrijedne 60 slajdova.

Spoji više prezentacija pomoću VBA koda

U novoj ili postojećoj PowerPoint datoteci u koju želite spojiti sve prezentacije pritisnite ALT + F11

Kliknite(Click) na Insert > Module i zalijepite kod unutar tog modula. Nemojte se truditi da ga spremite.

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

Napravite promjene koje sam označio podebljanim.

Pritisnite F5(Press F5) i program će izvršiti kod

Uvest će sve slajdove iz svih datoteka dostupnih u toj mapi. Međutim, izgubit će formatiranje. To je najveći problem koda, ali može spojiti bilo koji broj datoteka, što je njegova najveća prednost.  Obavezno(Make) uklonite VBA kod nakon dovršetka uvoza. Kod je PPTFAQ.c0m.(by PPTFAQ.c0m.)

3] Kopiraj i zalijepi slajdove

Zadržite izvorno formatiranje PowerPoint prezentacije

Ovo ponekad koristim kada postoji više datoteka, obično manje od tri, i moram kopirati samo nekoliko slajdova iz njih. Dok možete koristiti Ctrl + C i Ctrl + V , ali ćete izgubiti oblikovanje. Dakle, nakon što kopirate slajd, desnom tipkom miša kliknite odjeljak popisa slajdova odredišne ​​datoteke i odaberite zadržati format.

Nadam se da je sve ove metode bilo lako slijediti i da ste uspjeli spojiti više PowerPoint datoteka.

Pazite(Make) da odaberete između broja datoteka za spajanje i teme(Theme) slajda prema vašim potrebama.

Pročitajte sljedeće(Read next) : Kako spojiti Word dokumente(How to Merge Word Documents) .



About the author

Ja sam web programer s iskustvom u radu sa sustavima Windows 11 i 10. Također sam mnogo godina korisnik Firefoxa i postao sam prilično vješt u korištenju potpuno nove igraće konzole Xbox One. Moji glavni interesi leže u razvoju softvera, posebno u web i mobilnom razvoju, kao i znanosti o podacima. Dobro sam upućen u razne računalne sustave i njihovu upotrebu, tako da mogu pružiti nepristrane povratne informacije o raznim programima ili uslugama koje biste mogli koristiti.



Related posts