ブック内のシート名を右から取得したい

質問

Sub Sample()
Dim s As Worksheet

For Each s In Worksheets
Debug.Print s.Name
Next
End Sub

このコードを実行すると、左からシート名をひとつずつ取得しますが
右から取得して書き出すにはどうすればいいでしょうか？

回答No.1

めとろいと（@naktak） · ベストアンサー

Dim i As Integer
For i = Worksheets.Count To 1 Step -1
Debug.Print WorkSheets(i).Name
Next

とかでいけると思います。
イテレータでは出来ません。

お礼

回答頂きありがとうございました。