[已解决]请教各位大侠，下标越界如何解决？我是菜鸟，请看附件

18587071888 · 发表于 2013-9-9 22:58

请教各位大侠，下标越界如何解决？我是菜鸟，请看附件

最佳答案

sliang28

2013-9-9 23:02

本帖最后由 sliang28 于 2013-9-9 23:05 编辑

Arr = Sheets("领料单").Range("a2:d" & Myr)

只有4列啊,下面却出现 brr(m, 5) = Arr(i, 5) 第5列了,所以就越界了

改成:

Arr = Sheets("领料单").Range("a2:e" & Myr)

跳转到最佳答案楼层

sliang28 · 发表于 2013-9-9 23:02

这个最佳答案由 sliang28 给出，感谢 sliang28 的回答。

单击隐藏图章

本帖最后由 sliang28 于 2013-9-9 23:05 编辑

Arr = Sheets("领料单").Range("a2:d" & Myr)

只有4列啊,下面却出现 brr(m, 5) = Arr(i, 5) 第5列了,所以就越界了

改成:

Arr = Sheets("领料单").Range("a2:e" & Myr)

18587071888 · 发表于 2013-9-9 23:14

sliang28 发表于 2013-9-9 23:02
Arr = Sheets("领料单").Range("a2:d" & Myr)

只有4列啊,下面却出现 brr(m, 5) = Arr(i, 5) 第5列了,所以 ...

谢谢！

		自动登录	找回密码
密码			注册

[已解决]请教各位大侠，下标越界如何解决？我是菜鸟，请看附件

相关帖子

点评

浏览过的版块