Excelの全シート名の一覧を取得する方法

Visual Basic Editorのイミディエイトウィンドウで下記を実行する。

For Each i In ThisWorkbook.Sheets: debug.print i.name : next i

EOF