複数のパワーポイントのファイルを１つにまとめるVBA

2021.05.18

はじめに

中小企業診断士 ITコンサルのTakToolsです。グループワークなど、複数人で作業を行なった際に、最後に１つのパワーポイントのファイルにまとめる必要が出てくるかもしれません。そんな場合に便利なVBAをご紹介します。

VBA

初めはPowerAutomateDesktopで作成しようとしましたが、手間が掛かったので断念。その後、PowerShellを調べましたが、そのものずばりのVBAを見つけましたので、ファイルを借用させて頂きました。ありがとうございます。

Insert all slides from a group of presentations into the current presentation
From the PowerPoint FAQ: Insert all slides from a group of presentations into the current presentation
www.rdpslides.com

Solution 2 – Insert all slides from all presentations in the same folder　のプログラムが「複数のpptを１つにまとめるVBA」となります。

手順

  1. 複数のファイルを１つのフォルダに格納
  2. VBAを仕込んだpptm（パワーポイントのファイル）をフォルダに格納
  3. pptmを開く
  4. マクロを実行すると、１つのファイルにまとめる事が出来ます。

実行のようす

まとめ

２、３人のファイルであれば手でマージしても手間は掛かりませんが、５人以上くらいから面倒になって来ます。PowerAutomateDesktopを使うと、PowerPointの制御が面倒でした。

結局、VBAでやるのが一番確実で早かったという記事でした。ご参考にしてください。