スキルアップ・問題解決なら、モーグにおまかせ！

同種のオブジェクトのコレクション内で、指定されたオブジェクトを特定するインデックス番号を返すIndexプロパティで取得します。

次のように記述すると、メッセージボックスには、アクティブシートのインデックス番号が表示されます。

Sub Sample()
    MsgBox ActiveSheet.Index
End Sub