VBAにおけるシートの制御について、オブジェクト名がそれぞれ「Sheet2」「Sheet3」「Sheet4」「Sheet5」であるシートがあり、『Sheet2.Activate』という処理を、『FOR NEXT』ステートメントで「Sheet3」「Sheet4」「Sheet5」で実行するには、どのようなコードにすればできるでしょうか？

VBA では シートの「オブジェクト名（CodeName）」 は

Worksheets(\u0026quot;Sheet2\u0026quot;) のようには扱えないため、CodeName を直接参照します。



以下のようにしてください。

Public Sub オブジェクト試験()

Dim sheet_array As Variant

Dim sobj As Variant

sheet_array = Array(Sheet2, Sheet3, Sheet4, Sheet5)

For Each sobj In sheet_array

sobj.Activate

Next

End Sub