■複数のシートの場合
VBAで複数のシート処理をする場合には、Sheets.Countを使ってループを回します。
VBAの Sheets.Count とは、対象のBookに存在するシートの数です。
For i = 1 To Sheets.Count
Sheets(Sheets(i).Name).Select
Next i
Sheets(i).Nameは、i 番目のシート名を返します。
シートには内部的な（暗示的な）番号が順番に付けられていますので、 例文では、順番にすべてのシートを開いきます。