2020-10-06 全シートA1選択 Excel VBA 全てのシートでA1を Dim i As Long For i = Sheets.Count To 1 Step -1 Sheets(i).Select Range("A1").Select Next For i = Sheets.Count To 1 Step -1 Step -1 とすることで、最後に1番目のシートが選択されて終了する。