【入門編】【初心者】Slide.SlideNumberとSlide.SlideIndexの完全解説：スライドの追加・削除に左右されない正しいページ番号の取得法 – PowerPoint VBA解析バイブル

PowerPoint VBA

2026.09.11

こんにちは！PowerPoint VBAの世界へようこそ。
マクロの記録ボタンを押して「動いたはいいけれど、中身がさっぱり分からない…」そんなモヤモヤを抱えていませんか？

大丈夫、今日でその悩みとはお別れです。
今回は、PowerPoint VBAの基礎中の基礎でありながら、多くの人が最初に躓く「SlideNumber」と「SlideIndex」の決定的な違いについて、徹底的に解説していきます。

ここをクリアすれば、あなたの書くマクロは「思い通りに動かない初心者コード」から「現場で頼りにされる堅牢な自動化スクリプト」へと一気にランクアップします。さあ、一緒に本質をマスターしていきましょう！

—

1. なぜ「ページ番号」でエラーが起きるのか？

PowerPointで資料を作っているとき、こんなシチュエーションはありませんか？

「表紙スライドを増やしたせいで、中のページ番号が全部ズレた！」
「特定のスライドにだけ処理をしたいのに、順番を入れ替えたら別のスライドが書き換わっちゃった！」

VBAでスライドを操作する時も、これと全く同じ現象が起きます。
PowerPointの中には、私たちが普段目にする「印刷やスライドショーで表示されるページ番号」と、プログラムが管理している「物理的な並び順」の2種類が存在するからです。

これが、今回解説する `SlideNumber` と `SlideIndex` の正体です。

—

2. 決定的な違い：「SlideNumber」と「SlideIndex」

まずは、それぞれの定義をスッキリ整理しておきましょう。

図解イメージ

例えば、全3枚のスライドがあって、1枚目の「表紙」にはページ番号を表示させず、2枚目から「1」と数え始める設定にしているとします。

物理的な並び（SlideIndex）
`Index(1)` ＝表紙スライド
`Index(2)` ＝本文1枚目
`Index(3)` ＝本文2枚目

見た目の番号（SlideNumber）
表紙＝（番号なし / または 0扱い）
本文1枚目＝ `SlideNumber(1)`
本文2枚目＝ `SlideNumber(2)`

……どうでしょう？この違いが見えてくると、「どのスライドを指定したいのか」によって使い分ける必要があることが分かりますよね。

—

3. コードで体感する！それぞれの動き方

百聞は一見にしかず。実際にイミディエイトウィンドウや標準モジュールで実行して、その挙動を確かめてみましょう。

以下のコードは、現在アクティブなプレゼンテーションの全スライドについて、それぞれの「Index」と「SlideNumber」をメッセージボックスで表示するプログラムです。

Sub CheckSlideNumbers()
Dim sld As Slide

‘ すべてのスライドを順番にチェック
For Each sld In ActivePresentation.Slides
MsgBox “物理位置 (Index): ” & sld.SlideIndex & vbCrLf & _
“見た目の番号 (SlideNumber): ” & sld.SlideNumber, _
vbInformation, “スライド情報”
Next sld
End Sub

これを実行すると、見た目の番号が設定によってどうなっているかが手に取るように分かります。

—

4. 【実践】なぜスライドの削除・追加でズレが生じるのか？

ここで、初心者が一番やりがちな「罠」についてお話します。

もしあなたが、「見た目のページ番号が『3』のスライドを削除したい」と思って、以下のようなコードを書いたとしたら……？

‘ 【危険なコードの例】絶対マネしないでね！
Sub BadExample_DeleteSlide()
Dim sld As Slide

For Each sld In ActivePresentation.Slides
‘ SlideNumberが3のものを消そう！
If sld.SlideNumber = 3 Then
sld.Delete
End If
Next sld
End Sub

このコード、一見すると正しそうに思えますが、実は大惨事を引き起こす可能性があります。
なぜなら、`SlideNumber` はユーザーの設定や表紙の有無によって値が不連続になったり、意図しない挙動をすることがあるからです。さらに、ループ中で `Delete` メソッドを実行すると、コレクションのインデックスが狂い、予期せぬエラーやスライドの消し忘れが発生します。

正しいアプローチ：操作は「Index」、目的は「Number」

もしプログラムでスライドを管理・操作したい場合は、基本的に「SlideIndex（物理的な位置）」を基準にループを回し、オブジェクトを特定するのが鉄則です。

例えば、特定のタイトルを持つスライドや、条件に合致するスライドを安全に操作するための基本形がこちらです。

Sub SafeExample_ProcessSlides()
Dim i As Long
Dim targetSld As Slide

‘ 後ろから数えてループを回す（削除や追加をする時の鉄則！）
For i = ActivePresentation.Slides.Count To 1 Step -1
Set targetSld = ActivePresentation.Slides(i)

‘ 物理的なインデックスで安全にアクセスしつつ、
‘ 必要に応じてSlideNumberを確認する
Debug.Print “処理中：インデックス ” & targetSld.SlideIndex & _
” (表示番号: ” & targetSld.SlideNumber & “)”
Next i
End Sub

> 💡 プロからのワンポイントアドバイス
> スライドを削除するマクロを書くときは、必ず「後ろから数えて処理（Step -1）」をしてください。前から順番に消していくと、コマ送りでズレが生じてプログラムがバグります。これは現場のエンジニアが口を酸っぱくして言う重要テクニックです。

—

まとめ：ここをクリアすれば、PowerPoint VBAは怖くない！

お疲れ様でした！今回の重要なポイントをまとめます。

1. `SlideIndex` は、PowerPointが管理する「物理的な並び順（何番目のスライドか）」。操作やループの基準は常にこちらを使う。
2. `SlideNumber` は、印刷や画面で見える「ページ番号」。表紙などの影響でズレるため、プログラムの制御にはあまり向かない。
3. スライドの削除や追加を行うときは、後ろからループを回す（Step -1）ことでエラーを防げる。

この2つのプロパティの違いを理解しておくだけで、配布資料の自動生成ツールや、スライドの整理マクロを作るときに迷わなくなります。

ここをクリアできれば、あなたのPowerPoint VBAの基本はもうバッチリです！自信を持って、次の自動化チャレンジに進んでくださいね。それでは、快適なVBAライフを！