経緯

PowerPointの各スライドにPDFイメージを載せたかった。 しかしPDFを取り込む時は最初の一ページしか取り込んでくれないうえに、操作が非常に面倒くさい。 PDF分割はフリーツールがあるのでよいにせよ、肝心のPowerPoint操作が面倒すぎる。

というわけでVBA書きました。

動作

こんな感じです。 あるフォルダに分割済みのPDFがあって、その数だけ

• 最初のスライドをコピー
• 分割したPDFを差し込む を繰り返します。

※表示しているPDFは経済産業省のページから頂戴しました。

https://www.meti.go.jp/covid-19/pdf/kyufukin_chusho2.pdf?20201104

コードはgistに

https://gist.github.com/okayamadaiti/ae2cdd368cb44764de541c4ce129a3c1

実は

マクロで動作覚えさせたろ！と最初は考えていたものの、すでにPowerPointには記録機能がありませんでした。

知らなんだ……なので適当なVBAを書くことに。

最後に

VBAは個人利用にとどめましょう。

「自分の業務で」「自分の管理下で」「自分の責任で」のご利用を！