パワポのロゴ一括変更

Question

VBA初心者です。宜しくお願い致します。
会社のロゴが変更になり、パワポの表紙及びフッター等スライドマスターに貼られているロゴを新しいものへ一括変更は可能でしょうか？
宜しくお願い致します<(_ _)>

Answer 1

ヒントのみですが、
まず複数のパワーポイントスライドファイルを開くのは
エクセルVBAで、フォルダ内のパワポファイル(パスワードなし)を開いて、エクセルにタイトル等を表示が参考になるでしょう。
そして、タイトルマスターの操作は、TitleMaster プロパティ (PowerPoint)のコードが参考になるでしょう。

 For Each 受け皿となるオブジェクト In コレクション(ファイルリストやスライド内のオブジェクト集など)

の活用が有効です。少しずつコードを検証しつつ実装していきましょう。

Comments

[IloveF1]

早速ヒントを有難うございます。フォルダー内のリスト化やスライドマスターの更新につきましては、ご教示頂きましたサイトにて解決致しました。ロゴの変更は、恐らく”あるある”の実務のはず、皆プレゼン資料をどのように対応していますのか？新しいテンプレートに古いプレゼンを流し込むこと方法ではなく（個々の資料の設定が異なり微調整が大変なはず）、ロゴ変更で実例がありましたら大変助かります<(_ _)>

[seastar3]

スライドファイルのリストが取れたのなら、各スライドの1枚目のスライドのオブジェクトリスト中の画像オブジェクトの中身に指定した画像ファイルをはめるといった操作を実装することになるでしょう。

[IloveF1]

大変有難うございます！アドバイス頂きましたようにShapeオブジェクトの取得を試みてみます。