EXCEL里vba单元格值赋给数组的问题

EXCEL里vba单元格值赋给数组的问题

在OFFICE里面，下面的代码不会报错，但是肯定仍然是当前工作表：
Sub xxx()
    Dim s15(), fs15range&, s15r&, s15c&
    fs15range = 1
    s15r = 10
    s15c = 10
    s15 = Range(Cells(1, fs15range), Cells(s15r, s15c)).Value
End Sub追问我就是需要指定除了当前工作表的其它工作表，因为要从另一个工作表读数据。该怎么做？追答那就添加其它工作表的引用即可，下面的代码测试通过，你可以参考：
Option Explicit
Sub xxx()
    Dim s15(), fs15range&, s15r&, s15c&
    fs15range = 1
    s15r = 10
    s15c = 10
    s15 = Sheets("Sheet2").Range(Sheets("Sheet2").Cells(1, fs15range), Sheets("Sheet2").Cells(s15r, s15c)).Value
End Sub