Home » パワーポイントマクロ・PowerPoint VBAの使い方 » ノート » ノートをすべて削除するPowerPointマクロ

ノートをすべて削除するPowerPointマクロ

対象:PowerPoint97, PowerPoint2000, PowerPoint2002, PowerPoint2003

PowerPointにノートという機能があります。

スライドの補足説明やメモなどを入力することのできる便利な機能です。

このノートに関して、
「一気にすべてのノートを削除する方法はないのでしょうか?」
といったご質問をいただくことがあります。

作成したPPTファイルを取引先に渡すようなことは実務ではあり、そのときに取引先に知られたくないような内容がノートに入力されているようなこともあるわけで、そんなときにこのご質問をいただきます。

[スポンサード リンク]

ノートをすべて削除するサンプルマクロ

あってもよさそうなものですが、残念ながらPowerPointの標準機能としてノートの一括削除機能は用意されていないようです。

こんなときはVBA(Visual Basic for Applications)でマクロを作成しましょう。


Sub ノートをすべて削除する()

 Dim sld As Slide
 Dim msg As String
 
 msg = "ノートをすべて削除してもいいですか?"
 If MsgBox(msg, vbYesNo) = vbNo Then Exit Sub
 
 For Each sld In ActivePresentation.Slides
  sld.NotesPage.Shapes.Placeholders(2) _
   .TextFrame.TextRange = ""
 Next

End Sub

上記のマクロを実行すると、
「ノートをすべて削除してもいいですか?」
という確認メッセージが表示され、[はい]ボタンをクリックするとノートが全て削除されます。

サンプルマクロの解説

やっていることは単純です。

アクティブなプレゼンテーションファイルの、すべてのスライドにループ処理を行い、
 For Each sld In ActivePresentation.Slides

各スライドのノートに「""」(空白文字列)を代入することで、ノートを削除しています。
  sld.NotesPage.Shapes.Placeholders(2) _
   .TextFrame.TextRange = ""

関連語句
パワポのノートのテキストだけ消去する方法, パワーポイントでノートを消す
▼PowerPointのオブジェクト構造を理解するポイントをお伝えする有償のセミナー『PowerPoint VBA入門講座』開催時に案内を希望される方はメールアドレスをご登録ください。
ExcelマクロユーザーのためのPowerPoint VBA入門講座

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » ノート » ノートをすべて削除するPowerPointマクロ

[スポンサード リンク]
[スポンサード リンク]

TrackBack:7

TrackBack URL
PowerPoint トリビア from Youthfuldays Forever
【悩み】 クライアントにPowerPointの資料を配布する時に、 ノート欄(コメントを書けるとこ)の記述を削除してから渡したい。 でも100枚を超えるような報告書だと、 全チャートのコメントを削除するのは結構しんどい・・。 と思っていたら、ピンポイントなページ...
タイトルをノートに転記する−マクロ from インストラクターのネタ帳
対象:PowerPoint 97,2000,2002,2003 PowerPointで、ノートを全て削除するマクロをご紹介しました。 逆に、スライドのタイトルプレースホルダに入力されている文字列を、ノートにも同じように入力したいという場合があります。 ノートを印刷して、配布用の資料とするよう...
スライド内の全文字列をノートに転記−マクロ from インストラクターのネタ帳
対象:PowerPoint 97,2000,2002,003 タイトルプレースホルダの文字列を、ノートに転記するマクロをご紹介しました。 タイトルプレースホルダの文字列だけではなく、 「スライドで入力したすべての文字列をノートに転記するにはどうすればいいのでしょうか?」 というご質...
ノートに書式を設定する from インストラクターのネタ帳
対象:PowerPoint 97,2000,2002,2003 プレゼンテーション時の注意点などを入力しておくための、ノートという機能がPowerPointに用意されています。 2000以降のバージョンの場合、標準表示モードでスライドの下に「クリックしてノートを入力」と表示された[ノート]ペイ...
ノート部分のみを抜き出したい−Wordへ送信 from インストラクターのネタ帳
対象:PowerPoint97,PowerPoint2000,PowerPoint2002,PowerPoint2003 PowerPointのノート機...
ノートを一括削除する-Officeボタン-配布準備-ドキュメント検査 from インストラクターのネタ帳
対象:PowerPoint2007 このサイト「インストラクターのネタ帳」では、プレゼンテーションファイルに含まれているノートをすべて削除するマクロをご...
PowerPoint2010でノートをまとめて削除する-ファイルタブ-情報-問題のチェック-ドキュメント検査 from インストラクターのネタ帳
対象:PowerPoint2010 以前にご紹介したようなマクロを使わなくても、PowerPoint 2007ではノートを一括削除できることをご紹介しま...

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » ノート » ノートをすべて削除するPowerPointマクロ

「ノート」の記事一覧

検索

最近じっくりと読まれている記事

.