excelVBA下标越界了怎么改呢

要不要你的 1个月前已收到1个回答举报

共回答了189个问题采纳率：98.1% 评论

如果使用数组时，数组的下标超出数组的可取值范围就会出现这个错误，这个数组可以是自定义的也可以是系统自带的。

1.自定义数组：dimarr1(1to5)arr1(10)=555因为arr1数组为1到5，这里却是10，所以就会报下标越界错误。

2.系统自带的数组：一个excel工作表表有3张SheetSub下标越界()MsgBoxSheets(4).NameEndSub这里的Sheets(4)显然已经超出了3张Sheet，因此也会报下标越界错误。总之，有多种情况会引起“下标越界”的报错。下标越界错误大概有以下的原因和解决方法：　　1.引用了不存在的数组元素。　　2.下标比可能下标范围大或小，或是在应用程序中这一边的数组没有指定范围。检查数组的声明以确认其上界和下界。若使用的是重新指定范围的数组，应使用UBound和LBound函数来决定数组访问。如果索引指定为变量，应检查变量名的拼写。　　

3.声明数组时没有指定元素的数目。　　

4.引用了不存在的集合成员。试着使用ForEach...Next结构代替指定元素下标。使用速写形式的下标，结果指定了错误的元素。　　

5.下标越界不存在对应的工作薄、工作表名称是否写正确。

2小时前