Meerdere PowerPoint-presentaties samenvoegen tot één?

Wanneer veel mensen aan meerdere PowerPoint-presentaties(PowerPoint presentations) werken en deze uiteindelijk moeten samenvoegen, wordt het een uitdaging. De belangrijkste reden is de opmaak. Als de teams niet synchroon met elkaar zijn, wordt het een pijnlijke klus om ze naar hetzelfde format te brengen.

Microsoft PowerPoint biedt net als Word en Excel een in-house oplossing waarmee je meerdere PowerPoint - presentaties kunt samenvoegen en toch de opmaak intact kunt houden. De juiste manier om dit te doen, is door iedereen te vragen hetzelfde thema te gebruiken. Zorg(Make) ervoor dat u het PowerPoint-thema(PowerPoint Theme) in één bestand instelt en dit vervolgens met iedereen deelt.

Meerdere PowerPoint-(Multiple PowerPoint) presentaties samenvoegen

We hebben drie manieren om meerdere PowerPoint- bestanden samen te voegen. Terwijl de eerste goed is als je minder nummers hebt, en het behoud van de opmaak het primaire doel is. De tweede kan een willekeurig aantal bestanden combineren die beschikbaar zijn in een map.

  1. Methode voor dia's hergebruiken
  2. VBA-codemethode
  3. Kopieer en plak dia's.

Elke methode heeft zijn voor- en nadelen. Kies(Choose) verstandig.

1] Methode voor hergebruik van dia's

Meerdere PowerPoint-presentaties samenvoegen

Microsoft PowerPoint biedt een ingebouwde tool: Dia's opnieuw gebruiken. (Reuse Slides.)Hiermee kunt u enkele of meerdere dia's van een andere naar uw presentatie importeren, zonder dat u het andere bestand hoeft te openen. Wanneer u deze optie gebruikt, zorg er dan voor dat u de optie voor opmaak kiest, vooral als u hetzelfde thema als het bronbestand wilt hebben.

  1. Open een nieuw PowerPoint -bestand of een bestaand bestand waarin u de dia's wilt samenvoegen.
  2. Selecteer de dia waarna u de dia's uit het bronbestand wilt invoegen.
  3. Ga naar Home > New Slide > Reuse Slide.
  4. Blader(Browse) om het bestand te selecteren dat u wilt samenvoegen. Klik dan op de pijlknop.
  5. Het onthult alle beschikbare zijden op die dia.
  6. Klik(Click) op de dia die u wilt invoegen en deze wordt direct aan de dia toegevoegd.
  7. Als u de indeling precies zoals de brondia wilt behouden, vinkt u het vakje aan met de tekst ' Bronopmaak(Keep source formatting) behouden '.

Elke dia die u hier toevoegt, is een kopie. Het bronbestand blijft intact en er worden geen wijzigingen in aangebracht. Elke wijziging die u in het samengevoegde document aanbrengt, wordt niet beschikbaar in het oorspronkelijke bestand.

Een van de beste aspecten van importeren met deze methode is dat alle animaties of overgangen behouden blijven. (it will keep all animations or transitions.)Vroeger was dat niet het geval en moest men de Object-methode gebruiken(use the Object method) , gevolgd door meerdere configuraties om het te laten werken. Objectmethode(Object Method) is alleen handig als u meerdere bestanden in één wilt inpakken.

2] VBA-codemethode

Aangezien er geen native methode is om meerdere PowerPoint-presentaties(PowerPoint Presentations) samen te voegen , zullen we een VBA -code moeten gebruiken, net zoals we deden om Excel - bestanden samen te voegen. Het is ongecompliceerd en werkt beter in vergelijking met de VBA -code die we voor Excel gebruikten . De code werkte prima voor mij en ik kon 3 PowerPoint - bestanden samenvoegen met een waarde van 60 dia's.

Meerdere presentaties samenvoegen met VBA-code

In het nieuwe of bestaande PowerPoint -bestand waar u alle presentaties wilt samenvoegen, drukt u op ALT + F11

Klik(Click) in Insert > Module en plak de code in die module. Doe geen moeite om het op te slaan.

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

Breng de wijzigingen aan die ik als vet heb gemarkeerd.

Druk op F5(Press F5) en het zal de code uitvoeren

Het importeert alle dia's uit alle bestanden die in die map beschikbaar zijn. Het zal echter de opmaak verliezen. Dat is het grootste probleem met de code, maar het kan een willekeurig aantal bestanden samenvoegen, wat het belangrijkste voordeel is.  Zorg(Make) ervoor dat u de VBA -code verwijdert zodra het importeren is voltooid. De code is van PPTFAQ.c0m.(by PPTFAQ.c0m.)

3] Kopieer en plak dia's

Houd bronopmaak PowerPoint-presentatie

Ik gebruik dit soms als er meerdere bestanden zijn, meestal minder dan drie, en ik hoef er maar een paar dia's van te kopiëren. Hoewel u Ctrl + C en Ctrl + V kunt gebruiken, verliest u de opmaak. Dus nadat u de dia hebt gekopieerd, klikt u met de rechtermuisknop op het gedeelte met de dialijst van het doelbestand en selecteert u de indeling behouden.

Ik hoop dat al deze methoden gemakkelijk te volgen waren en dat je meerdere PowerPoint- bestanden kon samenvoegen.

Zorg(Make) ervoor dat u kiest tussen het aantal bestanden dat u wilt samenvoegen en het thema(Theme) van de dia, afhankelijk van uw behoefte.

Lees volgende(Read next) : Hoe u Word-documenten samenvoegt(How to Merge Word Documents) .



About the author

Ik werk als consultant voor Microsoft. Ik ben gespecialiseerd in het ontwikkelen van mobiele apps voor Apple- en Android-apparaten en ben ook betrokken bij het ontwikkelen van Windows 7-apps. Mijn ervaring met smartphones en Windows 7 maakt mij de ideale kandidaat voor deze functie.



Related posts