関連記事

これの一番下の記事にいただいた質問です。こちらの方のはかなり仕様が決まってて、ぼんやり考えたコードは不要になっちゃったので、供養と思ってブログに書き散らします。

コードと解説

まずはざっくりな仕様説明として、

フォルダを指定して、その中に入っているxlsxファイルの、すべてのシート上にあるシェイプのなかからグラフ(Chart)だった場合のみ、新規pptxファイルにコピペしていきます。1シートにつき1枚スライドが追加され、グラフが複数存在する場合は右下にちょっとずつズレて貼り付けされていきます。貼り付けを行った場合、左上に該当のブック名とシート名がテキストボックスで挿入されます。

コードにウザいくらいコメントつけてあるのでこれ以上書くこともないのですが…、いったんフォルダ内のxlsxファイル名をコレクションに格納して、それをもとにブックをループでまわして、そのなかのシートもループして、シートごとにすべてのシェイプをループでまわして、もしグラフ(Chart)だったらコピペして、という感じです。

カスタマイズすれば、1グラフ1スライドにも1ブック1スライドにもできるし、グラフだけじゃなくて図形なんかもコピペできます。

  • このエントリーをはてなブックマークに追加
  • follow us in feedly 662
  • RSSを登録

公開日:2017/12/11


コメントを残す




*印は必須項目です。コメントは承認制ですので、反映までしばらくお待ち下さい。(稀にですがスパムの誤判定にて届かないこともあるようですので、必要な際はお問い合わせからお願い致します。)


back to top