求助，下标越界问题

河南防腐小屈 · 发表于 2023-2-13 04:51

附件中，打开拆分工具.xlsm ，点击更新目录按钮，对“成果表”中的文件进行更新，结果提示“下标越界",求大神帮忙解决，谢谢！打开调试，如图所示

河南防腐小屈 · 发表于 2023-2-13 05:56

顶一下，在线求教大佬

zldccmx · 发表于 2023-2-13 08:11

zldccmx · 发表于 2023-2-13 08:13

select case sh.name
case "目录", "封面", "制表说明"
case else
n=n+1
‘*******
end select

半百 · 发表于 2023-2-13 10:33

定义数组ar的大小错了，分表中只有两个可排除的表（"目录" 、 "封面"），你却要排除三个，导致n大于Ubound(ar)。

河南防腐小屈 · 发表于 2023-2-13 11:16

半百发表于 2023-2-13 10:33
定义数组ar的大小错了，分表中只有两个可排除的表（"目录" 、 "封面"），你却要排除三个，导致n大于Ubound ...

我应该怎么改？

MOY838840554 · 发表于 2023-2-13 11:24

本帖最后由 MOY838840554 于 2023-2-13 11:28 编辑

有些表没有制表说明，-3减多了

河南防腐小屈 · 发表于 2023-2-13 11:25

MOY838840554 发表于 2023-2-13 11:24
N=0的初始化值在循环外面

我就想知道怎么改

河南防腐小屈 · 发表于 2023-2-13 11:30

半百发表于 2023-2-13 10:33
定义数组ar的大小错了，分表中只有两个可排除的表（"目录" 、 "封面"），你却要排除三个，导致n大于Ubound ...

这样子改吗？

河南防腐小屈 · 发表于 2023-2-13 11:32

MOY838840554 发表于 2023-2-13 11:24
有些表没有制表说明，-3减多了

谢谢，我把制表说明那个删除，然后把-3改成-2就可以了吧？

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

[求助] 求助，下标越界问题