PowerPointでVBAを使ってセクションを作成する方法【初心者向け解決ガイド】

X Facebook はてブ LINE コピー

2025.10.102026.09.04

パソコンパソコン・スマホ教室

Microsoft OfficePowerPoint

スポンサーリンク

PowerPointのプレゼンテーションが大きくなると、スライドを整理するのが大変ですよね。特に、セクションを使ってスライドをグループ化することで、管理が格段に楽になります。今回は、VBA（Visual Basic for Applications）を使って、PowerPointのプレゼンテーションにセクションを追加する方法を、初心者の方にもわかりやすくご紹介します。

スポンサーリンク

目次

1. VBAとは？PowerPointで何ができるのか
2. セクションを使うと何が便利なのか
3. VBAでセクションを追加する方法
4. よくある質問や疑問
   1. Q1: セクションを削除することはできますか？
   2. Q2: セクションの名前を変更することはできますか？
   3. Q3: セクションを移動することはできますか？
5. まとめ

VBAとは？PowerPointで何ができるのか

PowerPointのイメージ

VBAは、Microsoft Office製品に組み込まれているプログラミング言語で、日々の作業を自動化したり、機能を拡張したりすることができます。例えば、毎回同じ操作を手動で行っている場合、その作業をVBAで自動化することで、時間を大幅に節約できます。

セクションを使うと何が便利なのか

PowerPointのセクション機能を使うと、以下のようなメリットがあります

ここがポイント！

• スライドの整理が簡単になる関連するスライドをまとめてグループ化できます。
• スライドの移動や削除が楽になるセクション単位で操作できるので、個別のスライドを探す手間が省けます。
• プレゼンテーションの構成がわかりやすくなるセクション名を付けることで、内容が一目でわかります。

VBAでセクションを追加する方法

では、実際にVBAを使ってセクションを追加してみましょう。以下の手順で進めます。

1. PowerPointを開くまず、PowerPointを起動し、プレゼンテーションを開きます。
2. VBAエディターを開くキーボードの「Alt」キーと「F11」キーを同時に押して、VBAエディターを開きます。
3. 新しいモジュールを挿入エディター内で「挿入」メニューから「モジュール」を選択し、新しいモジュールを作成します。
4. コードを入力以下のコードをモジュールに貼り付けます

Sub セクションを追加()
    ' プレゼンテーションのセクションプロパティを取得
    Dim セクション As Object
    Set セクション = ActivePresentation.SectionProperties

    ' セクションを追加（位置1、名前「新しいセクション」）
    セクション.AddSection 1, "新しいセクション"
End Sub

5. コードを実行エディター内で「F5」キーを押すか、ツールバーの「実行」ボタンをクリックして、コードを実行します。
6. 結果を確認PowerPointに戻ると、新しいセクションが追加されていることが確認できます。

よくある質問や疑問

Q1: セクションを削除することはできますか？

はい、セクションを削除することも可能です。以下のコードで、指定したセクションを削除できます

Sub セクションを削除()
    ' プレゼンテーションのセクションプロパティを取得
    Dim セクション As Object
    Set セクション = ActivePresentation.SectionProperties

    ' セクションを削除（位置1）
    セクション.Delete 1
End Sub

Q2: セクションの名前を変更することはできますか？

はい、セクションの名前を変更することができます。以下のコードで、指定したセクションの名前を変更できます

Sub セクションの名前を変更()
    ' プレゼンテーションのセクションプロパティを取得
    Dim セクション As Object
    Set セクション = ActivePresentation.SectionProperties

    ' セクションの名前を変更（位置1を「新しい名前」に）
    セクション.Rename 1, "新しい名前"
End Sub

Q3: セクションを移動することはできますか？

はい、セクションを他の位置に移動することも可能です。以下のコードで、指定したセクションを移動できます

Sub セクションを移動()
    ' プレゼンテーションのセクションプロパティを取得
    Dim セクション As Object
    Set セクション = ActivePresentation.SectionProperties

    ' セクションを移動（位置1を位置2の前に移動）
    セクション.Move 1, 2
End Sub

まとめ

VBAを使ってPowerPointのプレゼンテーションにセクションを追加することで、スライドの整理や管理が格段に楽になります。最初は難しそうに感じるかもしれませんが、少しずつ覚えていけば、作業効率が大幅に向上します。ぜひ、今回ご紹介した手順を試してみてくださいね。