ブック内に含まれる全てのシート名を取得する – VBA

開いているブックに含まれているシート名を取得する方法を2つ紹介します。
1つ目はSheetsで左側からのシート番号を指定してシート名を取得する方法。
2つ目はブックに含まれるworksheetオブジェクトを一つずつ取得して、その名前を取得する方法。
どちらも同じ様に名前を取得できますが、2つ目の方法でループ内でシートオブジェクトに対し操作を行う場合に
何かと便利になるので、個人的にはおすすめです。

'１つめの方法
For i = 1 To ThisWorkbook.Sheets.Count
    Debug.Print Sheets(i).Name
Next i

'２つめの方法
Dim sht As Worksheet

For Each sht In Worksheets
    Debug.Print "name = " & sht.Name
Next sht