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

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

対象:PowerPoint2003, PowerPoint2007, PowerPoint2010

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

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

[スポンサードリンク]

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

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

Sub タイトルスライドのみにする()
 With ActivePresentation.Slides
  Dim i As Long
  For i = .Count To 1 Step -1
   With .Item(i)  
    If .Layout <> ppLayoutTitle Then
      .Delete
    End If  
   End With
  Next
 End With
End Sub

サンプルマクロで行っている処理

アクティブなプレゼンテーションファイルのSlideの後ろから前にFor~Nextループを回して、
  With ActivePresentation.Slides
   Dim i As Long
   For i = .Count To 1 Step -1

もしも、タイトルスライドでなかったときに、
    With .Item(i)    
     If .Layout <> ppLayoutTitle Then

削除を行っています。
       .Delete

最終更新日時:2020-02-18 06:06

[スポンサードリンク]

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

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

検索


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

.