Kemas kini terakhir: Jun 2020
Berkenaan dengan: Office 2019 dan lebih lama. Windows sahaja.
Berikut adalah soalan daripada seorang pembaca:
Sebagai sebahagian daripada pembentangan laporan suku tahunan saya kepada pihak pengurusan, saya sering perlu menyalin beberapa slaid maklumat umum daripada pembentangan lain. Bukan masalah besar, tetapi ia akan menjadi penjimat yang penting untuk dapat mengautomasikan latihan ini. Sebarang bantuan Makro VBA untuk mencapainya adalah dihargai!
Seperti yang anda baru sebutkan, anda boleh mengautomasikan salin dan tampal slaid dalam PowerPoint menggunakan Visual Basic untuk Aplikasi. Jika anda perlu membuat beberapa pembentangan setiap bulan, automasi salinan / import slaid ini boleh menjadi penjimat masa yang besar!
PowerPoint VBA untuk menambah slaid
Mari teruskan dengan latihan mudah ini.
Mula-mula, pastikan tab pembangunan anda didayakan dan kelihatan. Begini cara untuk melakukannya .
Saya akan menganggap bahawa anda telah mencipta pembentangan yang didayakan Makro (jenis fail ialah .pptm), yang anda telah letakkan dalam direktori yang sama daripada pembentangan sumber anda (yang saya akan rujuk sebagai source.pptm). Begini cara membuat persembahan PowerPoint dengan VBA .
Mula-mula, mari ambil sandaran pembentangan itu (salin mudah dan simpan).
Kemudian marilah kami meneruskan dan memasukkan Makro berikut ke dalam modul VBA baharu dalam pembentangan destinasi anda. Semua butiran tentang cara melakukannya boleh didapati dalam tutorial PowerPoint VBA kami .
Berikut ialah kod VBA yang anda perlukan untuk menyalin dan menampal slaid secara automatik.
Beberapa andaian yang saya buat:
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
Jelas sekali, jangan ragu untuk menukar pengindeksan nombor slaid dalam kod supaya ia sesuai dengan keperluan anda.
Anda boleh membuat gelung melalui beberapa pembentangan dan memasukkan slaid tertentu daripada setiap satu ke dalam laporan pengurusan anda.
PowerPoint VBA untuk menduplikasi slaid
Daripada menyalin slaid ke pembentangan lain, anda mungkin mahu mengklon satu atau lebih slaid dalam pembentangan anda:
Sub CopySlides()
' Short snippet to duplicate the third slide in a presentation, change the index/es accrodingly
ActivePresentation.Slides(3).Duplicate
End Sub
Itu hanyalah beberapa contoh mudah automasi PowerPoint. Pembaca yang mencari soalan khusus, sila hantar pertanyaan melalui halaman Kenalan.
Semoga Bermanfaat 🙂
Masalah dengan contoh sebelumnya ialah pemformatan tema persembahan asal tidak disalin. Andaikan 2 helaian mempunyai pemformatan yang berbeza, inilah yang akan berlaku:
Contoh 1
|
|
Ini pembentangan dengan slaid yang ingin kami salin:
Keputusan:
Untuk mengatasi masalah ini, anda boleh menggunakan kod di bawah:
|
|
Selain daripada menyalin slaid, kod di atas menyalin reka bentuk. Jika anda ingin melakukan ini secara manual, anda akan menyalin master slaid ke persembahan baharu. Anda tidak boleh menyalin master slaid menggunakan VBA tetapi sebaliknya anda boleh menetapkan sifat reka bentuk slaid.
Gunakan semak semak perancangan acara boleh cetak dan templat belanjawan dalam Word ini untuk mengesan pemilik, tarikh akhir, kos, vendor, dan kesediaan hari acara dengan pemeriksaan kualiti yang jelas.
Baiki formula Excel yang tidak mengira secara automatik dalam tiga langkah: pulihkan mod pengiraan, paksa pengiraan semula, dan baiki formula yang diformatkan sebagai teks.
Gunakan jadual pembersihan mingguan boleh cetak ini untuk hos Airbnb bagi mengatur penggantian tetamu, pembersihan berulang, pengisian semula, pemeriksaan, dan penyerahan daripada Word ke PDF.
Bina log penyelenggaraan peralatan Excel yang praktikal untuk pengurus bengkel dengan ID aset, sejarah servis, tarikh luput, kawalan status, penjejakan masa henti, dan senarai semak audit akhir.
Bina pitch deck pelabur minimalis dalam PowerPoint dengan struktur 12 slaid yang praktikal untuk startup teknologi, serta panduan mengenai bukti, metrik, dakwaan pengumpulan dana, dan templat .potx yang boleh digunakan semula.
Bina pembentangan senarai hartanah moden dalam PowerPoint dengan pelan slaid percuma, tip templat disahkan, amaran CMA, semakan hak foto, dan perlindungan Perumahan Adil.
Bandingkan HubSpot Free CRM dan Zoho CRM untuk ejen hartanah solo, termasuk kenalan, saluran jualan, automasi, penyesuaian, penjadualan, had, dan pencetus naik taraf.
Baiki rakaman skrin PowerPoint yang senyap dengan memeriksa kawalan Audio, kebenaran mikrofon Windows, peranti input aktif, jangkaan audio sistem, dan kemas kini Office.
Gunakan templat PDF penjadualan masa harian boleh cetak untuk merancang jam kerja fokus WFH, mesyuarat, rehat, tugas pentadbiran, dan penimbal yang realistik tanpa memuatkan hari anda secara berlebihan.
Bina pembentangan laporan status projek Agile yang ringkas dengan matlamat sprint, hasil, risiko, isyarat kualiti, keputusan, dan langkah seterusnya—tanpa menjadikan slaid sebagai timbunan backlog.
