Kuinka yhdistää useita PowerPoint-esityksiä yhdeksi

Kun monet ihmiset työskentelevät useiden PowerPoint-esitysten(PowerPoint presentations) parissa ja joutuvat sitten yhdistämään ne lopulta, siitä tulee haastavaa. Ensisijainen syy on muotoilu. Jos joukkueet eivät ole synkronoituja keskenään, niiden saattaminen samaan muotoon on tuskallista.

Microsoft PowerPoint tarjoaa (Microsoft PowerPoint)Wordin(Word) ja Excelin(Excel) tapaan sisäisen ratkaisun , jonka avulla voit yhdistää useita PowerPoint - esityksiä ja säilyttää muotoilun ennallaan. Oikea tapa tehdä tämä on pyytää kaikkia käyttämään samaa teemaa. Varmista(Make) , että määrität PowerPoint-teeman(PowerPoint Theme) yhteen tiedostoon ja jaa se sitten kaikkien kanssa.

Kuinka yhdistää useita PowerPoint(Multiple PowerPoint) - esityksiä

Meillä on kolme tapaa yhdistää useita PowerPoint - tiedostoja. Vaikka ensimmäinen on hyvä, kun sinulla on vähemmän numeroita, ja muotoilun säilyttäminen on ensisijainen tavoite. Toinen voi yhdistää minkä tahansa määrän kansiossa olevia tiedostoja.

  1. Käytä Slides-menetelmää uudelleen
  2. VBA-koodimenetelmä
  3. Kopioi Liitä diat.

Jokaisella menetelmällä on etunsa ja haittansa. Valitse(Choose) viisaasti.

1] Käytä dioja uudelleen

Kuinka yhdistää useita PowerPoint-esityksiä

Microsoft PowerPoint tarjoaa sisäänrakennetun työkalun – Käytä dioja uudelleen. (Reuse Slides.)Sen avulla voit tuoda esitykseen yhden tai useita dioja toisesta ilman, että sinun tarvitsee avata toista tiedostoa. Kun käytät tätä vaihtoehtoa, muista valita muotoiluvaihtoehto, varsinkin jos haluat käyttää samaa teemaa kuin lähdetiedosto.

  1. Avaa uusi Powerpoint - tiedosto tai olemassa oleva tiedosto, johon haluat yhdistää diat.
  2. Valitse dia, jonka jälkeen haluat lisätä diat lähdetiedostosta.
  3. Siirry kohtaan Home > New Slide > Reuse Slide.
  4. Valitse selaamalla(Browse) tiedosto, jonka haluat yhdistää. Napsauta sitten nuolipainiketta.
  5. Se paljastaa kaikki kyseisellä dialla käytettävissä olevat puolet.
  6. Napsauta(Click) diaa, jonka haluat lisätä, ja se lisätään välittömästi diaan.
  7. Jos haluat säilyttää muodon täsmälleen lähdediana, valitse valintaruutu, jossa lukee " Säilytä(Keep source formatting) lähdemuotoilu ".

Jokainen tähän lisäämäsi dia on kopio. Lähdetiedosto säilyy ennallaan, eikä siihen tehdä muutoksia. Yhdistettyyn asiakirjaan tekemäsi muutokset eivät ole käytettävissä alkuperäisessä tiedostossa.

Yksi parhaista osista tuonnissa tällä menetelmällä on, että se säilyttää kaikki animaatiot tai siirtymät. (it will keep all animations or transitions.)Näin ei ollut aiemmin, ja piti käyttää Object-menetelmää(use the Object method) , jota seurasi useita määrityksiä, jotta se toimisi. Object Method on hyödyllinen vain, jos haluat pakata useita tiedostoja yhdeksi.

2] VBA-koodimenetelmä

Koska ei ole olemassa alkuperäistä tapaa yhdistää useita PowerPoint-esityksiä(PowerPoint Presentations) , meidän on käytettävä VBA - koodia, aivan kuten teimme yhdistäessämme Excel - tiedostoja. Se on suoraviivainen ja toimii paremmin verrattuna VBA - koodiin, jota käytimme Excelissä(Excel) . Koodi toimi minulle hyvin, ja pystyin yhdistämään 3 PowerPoint - tiedostoa 60 dian arvosta.

Yhdistä useita esityksiä VBA-koodilla

Paina uudessa tai olemassa olevassa PowerPoint - tiedostossa, johon haluat yhdistää kaikki esitykset, ALT + F11

Napsauta (Click)Insert > Module ja liitä koodi kyseisen moduulin sisään . Älä vaivaudu tallentamaan sitä.

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

Tee muutokset, jotka olen merkinnyt lihavoiduiksi.

Paina F5(Press F5) ja se suorittaa koodin

Se tuo kaikki diat kaikista kansiossa olevista tiedostoista. Se kuitenkin menettää muotoilunsa. Se on koodin suurin ongelma, mutta se voi yhdistää minkä tahansa määrän tiedostoja, mikä on sen merkittävin etu.  Muista(Make) poistaa VBA - koodi, kun tuonti on valmis. Koodi on PPTFAQ.c0m.(by PPTFAQ.c0m.)

3] Kopioi Liitä diat

Säilytä PowerPoint-esityksen lähdemuotoilu

Käytän tätä joskus, kun tiedostoja on useita, yleensä vähemmän kuin kolme, ja minun tarvitsee kopioida niistä vain muutama dia. Vaikka voit käyttää Ctrl + C ja Ctrl + V , mutta menetät muotoilun. Joten kun olet kopioinut dian, napsauta hiiren kakkospainikkeella kohdetiedoston dialuettelo-osiota ja valitse Säilytä muoto.

Toivon, että kaikkia näitä menetelmiä oli helppo seurata, ja pystyit yhdistämään useita PowerPoint - tiedostoja.

Muista(Make) valita yhdistettävien tiedostojen lukumäärän ja dian teeman(Theme) välillä tarpeidesi mukaan.

Lue seuraavaksi(Read next) : Word-asiakirjojen yhdistäminen(How to Merge Word Documents) .



About the author

Olen Windows Phone -harrastaja ja olen työskennellyt uusien käyttötapojen kehittämiseksi käyttöjärjestelmän käyttöön jo yli 10 vuotta. Minulla on syvä ymmärrys Microsoft Officen toiminnasta ja siitä, kuinka saada Edgestä kaikki irti. Kokemukseni älypuhelimista mahdollistaa myös vahvojen suhteiden kehittymisen asiakkaiden ja työtovereiden kanssa, mikä on tärkeää kaikissa ammateissa.



Related posts