Viimeksi päivitetty: kesäkuussa 2020
Koskee: Office 2019 ja vanhempia. Vain Windows.
Tässä kysymys lukijalta:
Osana neljännesvuosittaista raporttiesitystäni johdolle joudun usein kopioimaan useita yleistietoja dioja muista esityksistä. Ei iso juttu, mutta tämän harjoituksen automatisointi olisi merkittävä säästö. Kaikki VBA-makrot auttavat tämän saavuttamisessa!
Kuten juuri mainitsit, voit automatisoida diojen kopioinnin ja liittämisen PowerPointissa Visual Basic for Applications -sovelluksella. Jos sinun on luotava useita esityksiä kuukaudessa, tästä diakopiointi-/tuontiautomaatiosta voi tulla valtava ajansäästö!
PowerPoint VBA diojen lisäämiseen
Aloitetaan tällä yksinkertaisella harjoituksella.
Varmista ensin, että kehitysvälilehti on käytössä ja näkyvissä. Näin teet sen .
Oletan, että olet jo luonut makroa käyttävän esityksen (tiedostotyyppi on .pptm), jonka olet sijoittanut samaan hakemistoon kuin lähdeesitys (jota kutsun nimellä source.pptm). Näin voit luoda PowerPoint-esityksen VBA:lla .
Otetaan ensin varmuuskopio esityksestä (yksinkertainen kopiointi ja tallennus).
Sitten mennään eteenpäin ja lisätään seuraava makro uuteen VBA-moduuliin kohdeesitykseesi. Kaikki tiedot sen tekemisestä löytyvät PowerPoint VBA -opetusohjelmastamme .
Tässä on VBA-koodi, jota tarvitset, jotta voit kopioida ja liittää dioja automaattisesti.
Tein pari oletusta:
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
Tietysti voit vapaasti muuttaa dian numeroiden indeksointia koodissa, jotta ne sopivat tarpeisiisi.
Pystyt käymään läpi useita esityksiä ja lisäämään jokaisesta tietyt diat hallintoraporttiisi.
PowerPoint VBA diojen monistamiseen
Sen sijaan, että kopioit dioja toiseen esitykseen, saatat haluta kloonata yhden tai useamman dian esitykseen:
Sub CopySlides()
' Short snippet to duplicate the third slide in a presentation, change the index/es accrodingly
ActivePresentation.Slides(3).Duplicate
End Sub
Nämä olivat vain pari yksinkertaista esimerkkiä PowerPoint-automaatiosta. Tarkkoja kysymyksiä etsivät lukijat voit lähettää kyselyn Yhteystiedot-sivun kautta.
Toivottavasti se auttaa 🙂
Edellisen esimerkin ongelmana oli, että alkuperäisen esityksen teemamuotoilua ei kopioitu. Oletetaan, että kahdella arkilla oli eri muotoilu, tämä olisi tapahtunut:
Esimerkki 1
|
|
Tämä esitys dialla, jonka haluamme kopioida:
Tulos:
Tämän ongelman voittamiseksi voit käyttää alla olevaa koodia:
|
|
Sen lisäksi, että kopioit dian, yllä oleva koodi kopioi mallin. Jos haluat tehdä tämän manuaalisesti, kopioi diamasterin uuteen esitykseen. Et voi kopioida diamasteria VBA:lla, mutta sen sijaan voit asettaa diojen suunnitteluominaisuuden.
Onko PowerPointin näytöntallennuksessa videota mutta ei ääntä? Tarkista ääniasetukset, Windowsin mikrofoni-ominaisuudet, tulolaitteet, toistoyhteensopivuus, päivitykset ja korjaus.
Luo ilmainen Excel-vuorolista automaattisilla tunneilla, yövuorojen käsittelyllä, taukovähennyksillä, viikkotunneilla, ylityövaroituksilla ja tulostettavalla tiiminäkymällä.
Luo ilmainen Excel-laskupohja, joka laskee verotettavat määrät, myyntiverot ja yhteissummat automaattisesti. Vertaa yhden verokannan, hakutaulukon ja rivikohtaisia verotusasetuksia sekä selvitä, milloin Excel ei enää riitä.
Muunna PDF muokattavaksi Wordiksi vähäisimmällä muotoiluhäviöllä käyttämällä Wordia tai Acrobatia. Opi, milloin suora muunnos toimii, milloin OCR on tarpeen ja miten korjata taulukot, fontit ja sivunvaihdot.
Laadi tulostettava rakennusurakan kustannusarvio Excelissä: työsuunnitelma, materiaalit, työvoima, yleiskulut, vararahat, katteet, verot ja tulostusvalmiit yhteenvetosummat – mukana kaavat ja vältettävät virheet.
Rakenna käytännöllinen liidenseuranta Exceliin taulukolla, vaihevalikoilla, seuranta-ajankohdilla, myöhässä olevien merkkauksilla, suodattimilla ja yksinkertaisella putkistoyhteenvetolla – sekä merkkejä siitä, milloin on aika siirtyä CRM-järjestelmään.
Opi käyttämään tulostettavaa päivittäistä aikablokkauksen mallipohjaa PDF-muodossa etätyöhön: suunnittele keskittymisblokit, palaverit, tauot, puskurit ja tulosta se oikein.
Vertaa HubSpot Free CRM:ää ja Zoho CRM:ää yksittäisille kiinteistönvälittäjille, mukaan lukien yhteystiedot, sähköposti, myyntiputket, mukauttaminen, automaatio, mobiilikäyttö ja päivitysten kompromissit.
Korjaa Macilla vain luku -tilassa avautuva Word-asiakirja tarkistamalla heinäkuun 2026 Office-päivitysongelma, Wordin muokkaustila, asiakirjan suojaus, Finderin käyttöoikeudet, OneDrive-pääsy ja tiedostosijainti.
Laadi yksinkertainen vähittäiskaupan varastolaskentataulukko Exceliin käytännöllisillä sarakkeilla, poikkeamakaavoilla, laskennan ohjauksella, tulostusvinkeillä ja nopealla tarkistuslistalla.
