EXCELでシート名の一覧を取得する方法

意外に簡単じゃないのね。
プロパティかなんかでさくっと取れるかと思ったのに。
この操作を実行するか、シート名のダブルクリック&コピペを繰り返すかどうかは、シートの数次第か。

以下、EXCEL 2013の例だけれど、2007や2010も同じはず。

1.EXCELを起動した状態。

excel_sheet_name_listing1.png

2.Altキー+F11でVisual Basic Editorを起動。

excel_sheet_name_listing2.png

3.イミディエイトウインドウ(表示されていない場合はCtrlキー+Gを押す)に、
For Each i In ThisWorkbook.Sheets : debug.print i.name : next i
とコピペし、Enterキーを押す。

excel_sheet_name_listing3.png

4.イミディエイトウインドウに一覧が表示されるのでコピー。

excel_sheet_name_listing4.png


以上です。

ぐっどらっこ。