1.Alt+F11でVBAのエディタを開く 2.Ctrl+Gでイメディエイトウインドウを開く 3.以下を入力 For Each i In ThisWorkbook.Sheets: debug.print i.name : next i <スポンサーリンク>