Home » パワーポイントマクロ・PowerPoint VBAの使い方 » Slide・スライド » タイトルスライドのみにするPowerPointマクロ

タイトルスライドのみにするPowerPointマクロ

対象:PowerPoint2003, PowerPoint2007, PowerPoint2010

章扉やセクション扉のスライドのレイアウトを「タイトルスライド」に設定して、大量のスライドの含まれているプレゼンテーションファイルを作成しているときに、タイトルスライドだけにしたいということがありました。

大量のスライドが含まれているわけですから、目視確認しながらタイトルスライドだけにするのはとても面倒でしたので、VBA(Visual Basic for Applications)でマクロを作って処理しました。

[スポンサードリンク]

タイトルスライドだけにするサンプルマクロ

以下のマクロを実行すると、アクティブなプレゼンテーションファイルで、タイトルスライドだけが残ります。


Sub タイトルスライドのみにする()

 Dim i As Long

 With ActivePresentation.Slides
  For i = .Count To 1 Step -1
   With .Item(i)
    
    If .Layout <> ppLayoutTitle Then
      .Delete
    End If
   
   End With
  Next i
 End With

End Sub

サンプルマクロの解説

アクティブなプレゼンテーションファイルのSlideの後ろから前にFor~Nextループを回して、
 With ActivePresentation.Slides
  For i = .Count To 1 Step -1
もしも、タイトルスライドでなかったときに、
   With .Item(i)    
    If .Layout <> ppLayoutTitle Then
削除を行っています。
      .Delete

[スポンサードリンク]

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » Slide・スライド » タイトルスライドのみにするPowerPointマクロ

TrackBack:0

TrackBack URL

Home » パワーポイントマクロ・PowerPoint VBAの使い方 » Slide・スライド » タイトルスライドのみにするPowerPointマクロ

「Slide・スライド」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.