求助 一个代码修改

caizhiliang

arr = Sheets("学员档案汇总").Range("A1").CurrentRegion

这句代码
怎么把中间的学员档案汇总指向单元格  随单元格的变动而变动呢？
如下的形式  可是我这样套用就不行
arr = Sheets[Sheets("组合查询").Range("a3")].Range("A1").CurrentRegion
arr = Sheets[a3].Range("A1").CurrentRegion
请老师指点

caizhiliang

自己顶上一下

砂海

arr = Sheets("学员档案汇总").Range("A1").CurrentRegion 这句代码 怎么把中间的学员档案汇总指向单元格  随单元格的变动而变动呢？ 如下的形式  可是我这样套用就不行 arr = Sheets[Sheets("组合查询").Range("a3")].Range("A1").CurrentRegion arr = Sheets[a3].Range("A1").CurrentRegion 请老师指点

sheets( 文本 )

arr = Sheets(         Sheets("组合查询").Range("a3") .value         ).Range("A1").CurrentRegion

爱疯

看不懂题意

caizhiliang

爱疯 发表于 2019-11-25 11:11
看不懂题意

谢谢  通过摸索已经解决了

caizhiliang

砂海 发表于 2019-11-23 17:38
sheets( 文本 )

arr = Sheets(         Sheets("组合查询").Range ...

谢谢您   已经摸索出来了

爱疯

那就好