Több PowerPoint-prezentáció egyesítése egybe

Ha sokan dolgoznak több PowerPoint-prezentáción(PowerPoint presentations) , és végül össze kell őket egyesíteni, akkor ez kihívást jelent. Az elsődleges ok a formázás. Ha a csapatok nincsenek szinkronban egymással, akkor fájdalmas munka lesz azonos formátumba hozni őket.

A Microsoft PowerPoint(Microsoft PowerPoint) olyan házon belüli megoldást kínál, mint a Word és az Excel , amely lehetővé teszi több PowerPoint -prezentáció egyesítését, miközben a formázás továbbra is érintetlen marad. Ennek helyes módja, ha megkér mindenkit, hogy ugyanazt a témát használja. Ügyeljen(Make) arra, hogy a PowerPoint témát(PowerPoint Theme) egy fájlban állítsa be, majd ossza meg mindenkivel.

Több PowerPoint(Multiple PowerPoint) - prezentáció egyesítése

Háromféleképpen egyesíthetünk több PowerPoint fájlt. Míg az első akkor jó, ha kevesebb a szám, és a formázás megőrzése az elsődleges cél. A második egy mappában tetszőleges számú fájlt kombinálhat.

  1. A diák újrafelhasználása
  2. VBA kód módszer
  3. Diák másolása.

Mindegyik módszernek megvan a maga előnye és hátránya. Válassz(Choose) okosan.

1] Diák újrafelhasználása

Több PowerPoint-prezentáció egyesítése

A Microsoft PowerPoint(Microsoft PowerPoint) beépített eszközt kínál – Diák újrahasználata. (Reuse Slides.)Lehetővé teszi, hogy egyetlen vagy több diát importáljon egy másik prezentációba anélkül, hogy meg kellene nyitnia a másik fájlt. Amikor ezt a beállítást használja, győződjön meg arról, hogy a formázási lehetőséget választja, különösen akkor, ha ugyanazt a témát szeretné használni, mint a forrásfájl.

  1. Nyisson meg egy új Powerpoint - fájlt vagy egy meglévőt, amelyben egyesíteni szeretné a diákat.
  2. Válassza ki azt a diát, amely után be szeretné szúrni a diákat a forrásfájlból.
  3. Lépjen a Home > New Slide > Reuse Slide.
  4. Tallózással(Browse) válassza ki az egyesíteni kívánt fájlt. Ezután kattintson a nyíl gombra.
  5. Felfedi a dián elérhető összes oldalt.
  6. Kattintson(Click) a beilleszteni kívánt diára, és az azonnal hozzáadódik a diához.
  7. Ha a formátumot pontosan úgy szeretné megtartani, mint a forrásdiát, jelölje be a „ Forrás formázásának(Keep source formatting) megtartása” jelölőnégyzetet .

Minden ide hozzáadott dia másolat. A forrásfájl érintetlen marad, és nem történik változás rajta. Az egyesített dokumentumban végzett változtatások nem lesznek elérhetők az eredeti fájlban.

Az ezzel a módszerrel történő importálás egyik legjobb része az, hogy az összes animációt és átmenetet megtartja. (it will keep all animations or transitions.)Korábban nem ez volt a helyzet, és az Object metódust(use the Object method) kellett használni , amit több konfiguráció követett, hogy működjön. Az Object Method(Object Method) csak akkor hasznos, ha több fájlt szeretne egybe csomagolni.

2] VBA kódmódszer

Mivel nincs natív módszer számos PowerPoint-bemutató egyesítésére, (PowerPoint Presentations)VBA -kódot kell használnunk , ugyanúgy, mint az Excel - fájlok egyesítésénél. Egyszerű, és jobban működik az Excelhez(Excel) használt VBA -kódhoz képest . A kód jól működött, és 3 PowerPoint(PowerPoint) fájlt tudtam egyesíteni 60 diával.

Egyesítsen több prezentációt VBA kóddal

Az új vagy meglévő PowerPoint - fájlban, amelyben az összes prezentációt egyesíteni szeretné, nyomja meg az ALT + F11

Kattintson(Click) a Insert > Module elemre, és illessze be a kódot a modulba. Ne fáradjon a mentéssel.

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

Végezze el az általam félkövéren megjelölt módosításokat.

Nyomja meg az F5 billentyűt(Press F5) , és végrehajtja a kódot

Importálja az összes diákat az adott mappában elérhető összes fájlból. Azonban elveszti a formázást. Ez a legnagyobb probléma a kóddal, de tetszőleges számú fájlt képes egyesíteni, ami a legnagyobb előnye.  Az(Make) importálás befejezése után feltétlenül távolítsa el a VBA -kódot. A kód a PPTFAQ.c0m.(by PPTFAQ.c0m.)

3] Diák másolása, beillesztése

Tartsa meg a PowerPoint-prezentáció forrásformázását

Ezt néha használom, ha több fájl van, általában kevesebb, mint három, és csak néhány diát kell másolnom belőlük. Bár használhatja a Ctrl + C és a Ctrl + V , de elveszíti a formázást. Tehát a dia másolása után kattintson jobb gombbal a célfájl dialista szakaszára, és válassza a formátum megtartása lehetőséget.

Remélem, ezek a módszerek könnyen követhetők, és sikerült több PowerPoint - fájlt egyesíteni.

Igény(Make) szerint válasszon az egyesítendő fájlok száma és a dia témája között.(Theme)

Olvassa el a következőt(Read next) : Word-dokumentumok egyesítése(How to Merge Word Documents) .



About the author

iOS fejlesztő vagyok, több mint 10 éves tapasztalattal. Alkalmazások fejlesztésére specializálódtam iPhone és iPad készülékekre. Tapasztalattal rendelkezem felhasználói folyamatok felépítésében, egyéni fejlesztési készletek (CDK) létrehozásában, valamint különféle alkalmazásfejlesztési keretrendszerekkel való munkában. Korábbi munkám során az Apple App Store kezelését segítő eszközöket is kifejlesztettem, amelyek egy termékkezelő eszközt és egy alkalmazásbeküldő eszközt is tartalmaznak.



Related posts