Kaip sujungti kelis „PowerPoint“ pristatymus

Kai daug žmonių dirba prie kelių „PowerPoint“ pristatymai ir tada reikia juos sujungti, tai tampa sudėtinga. Pagrindinė priežastis yra formavimas. Jei komandos nėra sinchronizuojamos tarpusavyje, tai taps skausmingu darbu, kad jos būtų vienodos.

„Microsoft PowerPoint“ siūlo vidinį sprendimą, kaip ir „Word“ bei „Excel“, kuris leis sujungti kelias „PowerPoint“ prezentacijas ir vis tiek palikti nepakeistą formatavimą. Teisingas būdas tai padaryti - paprašyti visų naudoti tą pačią temą. Būtinai nustatykite „PowerPoint“ temą viename faile ir bendrinkite ją su visais.

Kaip sujungti kelis „PowerPoint“ pristatymus

Turime tris būdus, kaip sujungti kelis „PowerPoint“ failus. Nors pirmasis yra geras, kai turite mažiau skaičių, o formatavimas yra pagrindinis tikslas. Antrasis gali sujungti bet kokį aplanke esančių failų skaičių.

1. Pakartotinis skaidrių metodo naudojimas
2. VBA kodo metodas
3. Kopijuoti skaidres.

Kiekvienas metodas turi savo pranašumą ir trūkumą. Rinkis išmintingai.

1] Pakartotinis skaidrių metodas

„Microsoft PowerPoint“ siūlo integruotą įrankį- Pakartotinai naudokite skaidres. Tai leidžia jums importuoti vieną ar kelias skaidres į savo pristatymą iš kito, neatidarant kito failo. Kai naudojate šią parinktį, įsitikinkite, kad pasirinkote formatavimo parinktį, ypač jei norite, kad tema būtų ta pati kaip ir šaltinio failo.

1. Atidarykite naują arba esamą „Powerpoint“ failą, kuriame norite sujungti skaidres.
2. Pasirinkite skaidrę, po kurios norite įterpti skaidres iš šaltinio failo.
3. Eiti į Pagrindinis> Naujas skaidrė> Pakartotinis skaidrės naudojimas.
4. Naršydami pasirinkite failą, kurį norite sujungti. Tada spustelėkite rodyklės mygtuką.
5. Tai atskleis visas toje skaidrėje esančias puses.
6. Spustelėkite skaidrę, kurią norite įterpti, ir ji bus iškart pridėta prie skaidrės.
7. Jei norite išlaikyti formatą tiksliai tokį, koks yra šaltinio skaidrė, pažymėkite laukelį, kuriame parašyta:Laikykite šaltinio formatavimą.“

Bet kuri čia pridėta skaidrė yra kopija. Šaltinio failas lieka nepažeistas ir jame nebus atliekami jokie pakeitimai. Bet kokie pakeitimai, kuriuos atliksite sujungtame dokumente, nebus prieinami pradiniame faile.

Viena iš geriausių importavimo naudojant šį metodą dalių yra ta tai išsaugos visas animacijas ar perėjimus. Anksčiau to nebuvo, todėl norint naudoti, reikėjo naudoti „Object“ metodą, po kurio buvo atliktos kelios konfigūracijos. Objekto metodas yra naudingas tik tuo atveju, jei norite supakuoti kelis failus į vieną.

2] VBA kodo metodas

Kadangi nėra daugelio „PowerPoint“ pristatymų sujungimo įprasto metodo, turėsime naudoti VBA kodą, kaip ir „Excel“ failų sujungimo atveju. Jis yra tiesus ir veikia geriau, palyginti su VBA kodu, kurį naudojome „Excel“. Kodas man gerai pasirodė, ir aš galėjau sujungti 3 „PowerPoint“ failus, kurių vertė 60 skaidrių.

Naujame arba esamame „PowerPoint“ faile, kuriame norite sujungti visas prezentacijas, paspauskite ALT + F11

Spustelėkite Įterpti> Modulis ir įklijuokite kodą į tą modulį. Nesivarginkite jo išsaugoję.

Sub InsertAllSlides () „Įterpkite visas skaidres iš visų pristatymų tame pačiame aplanke kaip ir šis“ Į šį; nebandykite įterpti ŠIO failo į save. „Dim vArray“ (kaip eilutė „Dim x As Long“) Keisti "*.PPT nuo „iki“ *.PPTX "arba bet kokia kita, jei reikia: „EnumerateFiles ActivePresentation“.Kelias ir "C: \ PathtoSlidesYouWanttoImport", "*.PPT ",„ vArray “su„ ActivePresentation “x = 1 į UBound (vArray) Jei Len (vArray (x))> 0, tada .Skaidrės.„InsertFromFile vArray“ (x), .Skaidrės.Skaičiuokite pabaigą, jei kita pabaiga, su pabaiga Sub Sub EnumerateFiles (ByVal sDirectory As String, _ ByVal sFileSpec As String, _ ByRef vArray As Variant) “surinkite visus failus, atitinkančius failo specifikacijas, į„ vArray “, eilučių masyvą Dim sTemp As String ReDim vArray ( Nuo 1 iki 1) sTemp = Dir $ (sDirectory & sFileSpec) Darykite, kol Len (sTemp)> 0 'NĖRA „motininio laivo“ ... dabartinis pristatymas Jei „sTemp“ <> „ActivePresentation“.Pavadinimas, tada „ReDim“ išsaugokite „vArray“ (1 į UBound (vArray) + 1) vArray (UBound (vArray)) = sKatalogas ir sTemp pabaigos pabaiga, jei sTemp = Dir $ ciklo pabaiga

Atlikite pakeitimus, kuriuos pažymėjau kaip paryškintus.

Paspauskite F5 ir jis vykdys kodą

Jis importuos visas skaidres iš visų tame aplanke esančių failų. Tačiau jis praras formuluotę. Tai yra didžiausia kodo problema, tačiau ji gali sujungti bet kokį failų skaičių, o tai yra svarbiausias jo pranašumas.  Baigę importuoti, būtinai pašalinkite VBA kodą. Kodas sukurtas PPTFAQ.c0m.

3] Kopijuoti skaidres

Aš tai naudoju kartais, kai yra keli failai, paprastai mažiau nei trys, ir man reikia iš jų nukopijuoti tik keletą skaidrių. Nors galite naudoti „Ctrl“ + C ir „Ctrl“ + V, bet prarasite formatavimą. Taigi, nukopijavę skaidrę, dešiniuoju pelės mygtuku spustelėkite paskirties failo skaidrių sąrašo skyrių ir pasirinkite išlaikyti formatą.

Tikiuosi, kad visus šiuos metodus buvo lengva laikytis, ir jūs galėjote sujungti kelis „PowerPoint“ failus.

Įsitikinkite, kad pasirinkote failų skaičių, kurį norite sujungti, ir skaidrės temą pagal savo poreikius.

Skaitykite toliau: Kaip sujungti „Word“ dokumentus.