差し込みパワポ！パワーポイントに任意の文字を挿入するツール！

エクセルファイルに記載しているデータをパワーポイントに自動で転記したい！というニーズがありました。ワードのような純粋な差し込み印刷はないわけなのですが、ほとんど同じような機能を実装したツールを作ってみました！動画でも …

初めまして。とっても役に立つツールの公開、本当にありがとうございます。このVBAコードをmacで使えるようにするにはどうすればいいでしょうか？ chat gptにmacで使えるように修正してと依頼したところ tell application “Microsoft PowerPoint” activate set pptPresentation to make new presentation set endRow to (count of rows of sheet 1 of active workbook) – 1 set fileNameColumn to 2 — B列を指定 set startLoopRow to 8 — ループ開始行を指定 set endLoopRow to 66 — ループ終了行を指定 set templateFile to “path/to/template.pptx” set saveFolderPath to “path/to/save/folder/” repeat with cnt from 2 to endRow set slide to make new slide at end of pptPresentation with properties repeat with replaceCnt from startLoopRow to endLoopRow set findText to value of cell replaceCnt of row 7 of sheet 1 of active workbook set replaceText to value of cell replaceCnt of row cnt of sheet 1 of active workbook tell slide repeat with shapeIndex from 1 to count of shapes set oShp to shape shapeIndex set oTxtRng to text range of oShp set oTmpRng to oTxtRng.replace(findText, replaceText) repeat while oTmpRng is not missing value set oTxtRng to characters ((start character of oTmpRng) + (length of oTmpRng) + 1) to end of oTxtRng of oShp set oTmpRng to oTxtRng.replace(findText, replaceText) end repeat end repeat end tell end repeat save pptPresentation in (saveFolderPath & (value of cell fileNameColumn of row cnt of sheet 1 of active workbook) & “.pptx”) close pptPresentation end repeat end tell と言われました。貼り付けたところ、 “Microsoft PowerPoint” がエラーですと表示されます。

申し訳ありません。 MacBookは動作しないことを確認しています。また、私自身検証環境を、持っていないため、MacBook用のアドバイスは難しいです。。申し訳ありません。。

VBA初心者です。使いやすいツールを共有いただきありがとうございます。質問なのですが、G列H列とせずに、H列だけにしたいのですが、その場合はどうやってコードを書き換えればいいか教えていただけないでしょうか？またD列生年月日とE列性別をパワポに追加したいのですが、追加テキストボックスに紐づけるようコードはどのように書き換えれば動作するか教えていただけないでしょうか？よろしくお願いいたします。

このツールは基本的にVBAのコードを書き換える必要はありません。作られているパワポのテンプレートのG列H列と記載されているG列の文字列を削除するだけです！

はじめまして。ネットでいろいろ探しててここに辿り着きました。ランボタンで実行して、パワーポイントがちかちか切り替わってエクセルデータを読み込んでるようなのですが、、格納先にファイルが残らないんです。。｡ﾟ(ﾟ´Д｀ﾟ)ﾟ｡パスも貼り付けて指定したのですが、、悩。。。

出力先のパスが間違っているのかもしれません。お問い合わせページから設定されたツールの送付をおねがいします。私も同じ問題が発生しました。フォルダのパスも正しいことを確認しました。どのように解決すればよいでしょうか？事象を再現できないのですが、お問い合わせページからツールを送付いただくことは可能でしょうか？

もしよければお問い合わせ窓口から利用しているファイルを送付いただけませんか？ご連絡をよくいただくのですが、どなたもファイルをお送りいただけないので事象が確認できず。。場合によってはteams繋いで画面見せていただいたほうがすぐ解決できるのかなと思います。

出力したファイルが保存できませんでした。お問い合わせ窓口からpptファイルを送付しようとしましたが、添付できず。。。解消方法をご教示いただけませんでしょうか？コメントの通知が来ない設定になっており、気づくのに時間がかかってしまいました。お問い合わせページの設定を変更しましたので、お問い合わせページより内容送付ください。 RuNボタンを押した後、取り込まれるのですが、パワポが、開いたり閉じたりを繰り返し、パワポの別ファイルも開けません、数分待てば治るのですが、解決法はありますでしょうか？現状待つしか方法がないと思いますが、そんなに数分もかかるほど時間がかからないように思えておりまして、もしよろしければお問い合わせページから実際のファイルを送付ください。よろしくお願いします。

こちらに質問をしてでよいかわからないのですが、１点教えてください差し込みPPTをしたくて参考にさせていただきました。（私自身はほとんどマクロを触れないので、ほとんどそのまま使用しました）質問：マクロを実行して印刷をすると、1回目は正しく印刷されるのに、Excelのリストを作成しなおして、2回目にマクロを実行すると、Excelの行の1つ上の行の方の名前がファイル名となって保存されます。これは何かマクロの中で原因と考えられるものがありますでしょうか

Keiです。状況を把握するために、ツールの内容を確認させていただきたく存じます。別途ご連絡差し上げます。コメントを残すコメントをキャンセルプロフィール（Kei）最近の投稿

MBAで出会った優秀な人の特徴を簡潔にまとめておく。
【MS365 Copilot新機能】PowerPointで動画を自動生成！声も選べる時代に
SharePointパス変換ツール
ゴルフで3年ぶりに100切りしたので、ゴルフレッスンで習ったことメモします
エラー対処法：セキュリティリスクこのファイルのソースが信用できないため、Microsoftによりマクロの実行がブロックされました。