한 줄에 여러 시트 참조

Question

Excel VBA에서 한 줄로 여러 시트를 참조하는 방법이 있는지 궁금합니다. 나는이 시도 시트와 같은 일을 할 수 있도록하려는

Range("G1:G5, G6:G10, H5:H10") etc... 

: 나는 당신을 통해 여러 범위, 열, 행을 참조 할 수 있습니다 알고

Sheets("Sheet1_Name, Sheet2_Name, Sheet3_Name").Range(...) 

을하지만하지 않았다 그래서 시트 이름을 변수에 넣은 다음 변수를 참조하는 특별한 방법이 있는지 궁금 해서요.

Answer 1

Sub Test() 
    Dim sheetsArray As Sheets 
    Set sheetsArray = ActiveWorkbook.Sheets(Array("Sheet1", "Sheet2", "Sheet3")) 

    Dim target As Range 
    Dim sheetObject As Worksheet 

    ' change value of range 'a1' on each sheet from sheetsArray 
    For Each sheetObject In sheetsArray 
     Set target = sheetObject.Range("A1") 
     target.Value = "Test" 
    Next sheetObject 
End Sub