すべてのプレゼンテーションファイルを上書き保存するパワポマクロ

対象：PowerPoint2007, PowerPoint2010, PowerPoint2013

「vba パワーポイント上書き」
「パワーポイント保存 vba」
という検索で、このサイト・インストラクターのネタ帳へのアクセスが時折あることに気づきました。

保存・上書き保存をするPowerPoint VBA（Visual Basic for Applications）のコードを探している方による検索です。

参考になりそうな、上書き保存をするマクロをご紹介しておきます。

［スポンサードリンク］

全ファイルを上書き保存するサンプルマクロ

以下のようなマクロで、開いているすべてのプレゼンテーションファイルを上書き保存することができます。

Sub すべてのプレゼンテーションファイルを上書き保存する()
　Dim prs As Presentation

　On Error Resume Next
　For Each prs In Presentations
　　prs.Save
　Next prs
End Sub

すべてのプレゼンテーションファイルにループを回して、
　　For Each prs In Presentations

PresentationオブジェクトのSaveメソッドで保存をしています。
　　　prs.Save

すべてのプレゼンテーションファイルを上書き保存するPowerPointマクロ

一度も保存されていないファイルでいきなりSaveメソッドを実行しようとするとエラーとなってしまうので、ループ処理に入る前に
　　On Error Resume Next
を入れています。

PowerPoint VBAにも、同じようなメソッド、例えばPresentations.Saveメソッドが存在するかもしれないと考える方がいらっしゃるかもしれません。

オブジェクトブラウザーで、非表示のメンバーも表示して、確認してみましょう。

すべてのプレゼンテーションファイルを上書き保存するPowerPointマクロ

上図のとおり、PresentationsコレクションオブジェクトにSaveメソッドは存在していません。

やっぱり、ループ処理をして個々のPresentationオブジェクトのSaveメソッドを実行するしかありません。

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

3年前(2021年4月)の
人気記事

「Presentation・プレゼンテーション」の記事一覧