在一行中引用多个工作表

我想知道是否有办法在Excel VBA中的一行中引用多个工作表。 我知道你可以通过以下方式引用多个范围,列,行:

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

我希望能够用纸张做同样的事情我试过这个:

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

但是这并不奏效,所以我想知道是否有一种特殊的方法来做这个工作,把表格名称放入variables中,然后引用这些variables。

 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