[已解决]求教：怎样将工作表赋值给数组

jason5800295

RT
我编写的代码是这样的
    Set wb = Workbooks.Open("D:\123.xls")
    Set ws(1) = wb.Worksheets("Au")
    Set ws(2) = wb.Worksheets("Ag")
    Set ws(3) = wb.Worksheets("Cu")
    Set ws(4) = wb.Worksheets("Pb")
    Set ws(5) = wb.Worksheets("Zn")
请问这样逻辑上对吗？谢谢了！

最佳答案

月排行榜 / 总排行榜

妞叫七七

2013-6-20 16:37

没错,可以这样.把工作表对象放进数组里

跳转到最佳答案楼层

妞叫七七

没错,可以这样.把工作表对象放进数组里

jason5800295

妞叫七七 发表于 2013-6-20 16:37
没错,可以这样.把工作表对象放进数组里

那我调用的时候
wb.ws(i).Cells(row, 1)=Rng.Value
这样也是没有问题的了？

妞叫七七

数组不属于某个工作表
ws(i).Cells(row, 1)=Rng.Value
这样就可以了

jason5800295

妞叫七七 发表于 2013-6-20 16:42
数组不属于某个工作表
ws(i).Cells(row, 1)=Rng.Value
这样就可以了

非常感谢！

hellsparrow

{:321:}