Kuidas kopeerida lisaslaide oma PowerPointi esitlusse VBA makrodega?

Viimati värskendatud: juuni 2020

Kohaldatav: Office 2019 ja vanemad. Ainult Windows.

Siin on küsimus lugejalt:

Kvartaliaruande esitluse osana juhtkonnale on mul sageli vaja kopeerida mitu üldteabe slaidi teistest esitlustest. Pole suur asi, kuid selle harjutuse automatiseerimine oleks märkimisväärne kokkuhoid. Igasugune VBA makro aitab seda saavutada!

Nagu just mainisite, saate slaidide kopeerimist ja kleepimist PowerPointis automatiseerida, kasutades Visual Basic for Applications. Kui teil on vaja iga kuu luua mitu esitlust, võib see slaidide kopeerimise / importimise automatiseerimine olla tohutu aja kokkuhoid!

PowerPoint VBA slaidide lisamiseks

Alustame selle lihtsa harjutusega.

Kõigepealt veenduge, et teie arenduskaart oleks lubatud ja nähtav. Siin on, kuidas seda teha .

Eeldan, et olete juba loonud makro toega esitluse (failitüüp on .pptm), mille olete paigutanud lähteesitlusega (mida ma nimetan lähtetekstiks.pptm) ​​samasse kataloogi. Siit saate teada, kuidas VBA-ga PowerPointi esitlust luua .

Alustuseks teeme sellest esitlusest varukoopia (lihtne kopeerimine ja salvestamine).

Seejärel jätkakem ja sisestage järgmine makro teie sihtkoha esitluses uude VBA moodulisse. Kõik üksikasjad selle kohta, kuidas seda teha, leiate meie PowerPointi VBA õpetusest .

Siin on VBA-kood, mida vajate slaidide automaatseks kopeerimiseks ja kleepimiseks.

Paar oletust, mille tegin:

  • Teie allikaesitlus kannab nime source.pptm
  •  Kleepite lähteesitlusest slaidid 2–4
  • Asetate kopeeritud slaidid alustades 5. slaidiga.

Sub InsertFromOtherPres()

' This short VBA macro copies slides from one presentation and inserts them into another

ActivePresentation.Slides.InsertFromFile FileName:="source.pptm", Index:=1, SlideStart:=2, 
SlideEnd:=4

End Sub

Loomulikult muutke koodis slaidinumbrite indekseerimist, et need vastaksid teie vajadustele.

Saate panna selle läbima mitut esitlust ja sisestama igast konkreetsest slaidist oma juhtimisaruandesse.

PowerPoint VBA slaidide paljundamiseks

Slaidide teise esitlusse kopeerimise asemel võiksite oma esitlusse kloonida ühe või mitu slaidi.

Sub CopySlides()

' Short snippet to duplicate the third slide in a presentation, change the index/es accrodingly

ActivePresentation.Slides(3).Duplicate

End Sub

Need olid vaid paar lihtsat näidet PowerPointi automatiseerimisest. Lugejad, kes otsivad konkreetseid küsimusi, saatke päring julgelt kontaktide lehe kaudu.

Loodetavasti aitab 🙂


Kuidas kirjutada Microsoft Office 2016-s, 2019/365-s paremalt vasakule?

Kuidas kirjutada Microsoft Office 2016-s, 2019/365-s paremalt vasakule?

Siit saate teada, kuidas Microsoft Wordis LTR-klaviatuuridelt RTL-klaviatuuridele lülituda.

Kuidas määrata Exceli teksti fondi värvi VBA-ga?

Kuidas määrata Exceli teksti fondi värvi VBA-ga?

Siit saate teada, kuidas kasutada Excel VBA-d lahtri teksti, värvi, suuruse ja atribuutide programmiliseks muutmiseks.

Kuidas kontrollida, kas lahter või mitme lahtri vahemik on Excel VBA abil tühi?

Kuidas kontrollida, kas lahter või mitme lahtri vahemik on Excel VBA abil tühi?

Siit saate teada, kuidas programmeerida vba-d otsima töölehel või lahtrivahemikus tühje lahtreid.

Microsoft Wordi aeglane jõudlus? Seitse nõuannet Word 365 / 2019 / 2016 palju kiiremaks töötamiseks

Microsoft Wordi aeglane jõudlus? Seitse nõuannet Word 365 / 2019 / 2016 palju kiiremaks töötamiseks

Siit saate teada, kuidas saate Word 365 hõlpsalt kiiremini tööle panna, keelates lisandmoodulid, uuendades oma riistvara ja eemaldades

Kas ma saan vc_red failid oma personaalarvuti kõvakettalt kustutada?

Kas ma saan vc_red failid oma personaalarvuti kõvakettalt kustutada?

Siit saate teada kõike vajalikku VC_RED-i installi- ja kabinetifailide kohta. Kas nende kustutamine operatsioonisüsteemist Windows 7 ja 10 on ohutu?

Kas kuvada Word 365 / 2016 / 2019 ja Google Docsi päise ja jaluse teksti ainult esimesel lehel?

Kas kuvada Word 365 / 2016 / 2019 ja Google Docsi päise ja jaluse teksti ainult esimesel lehel?

Siit saate teada, kuidas jalust ja päist esimesel lehel kuvada ainult Word 365, 2016 ja 2019 puhul; samuti Google'i dokumentides

Kuidas töötada PowerPoint VBA-s sõnumi- ja sisestuskastidega?

Kuidas töötada PowerPoint VBA-s sõnumi- ja sisestuskastidega?

Siit saate teada, kuidas PowerPointis VBA-ga sõnumi- ja sisestuskaste kodeerida

Kuidas luua ja lisada slaide PowerPointi esitlustele VBA abil?

Kuidas luua ja lisada slaide PowerPointi esitlustele VBA abil?

Siit saate teada, kuidas kirjutada slaidide sisestamiseks ja uue esitluse loomiseks lihtne VBA-makro

Kuidas saan muuta oma Office 2016 ekraaniteema värve?

Kuidas saan muuta oma Office 2016 ekraaniteema värve?

Siit saate teada, kuidas kohandatud Office'i värviskeeme rakendada.

Kuidas avada .one-faile MAC- ja Windowsi arvutites?

Kuidas avada .one-faile MAC- ja Windowsi arvutites?

Siit saate teada, kuidas käivitada MAC-i ja Windowsi OneNote'i faililaiendeid