运行时错误9下标越界的处理方法

   2020-11-20 IP属地 浙江2080
核心提示:文章介绍excel中VBA运行时错误9下标越界的原因及其解决方法。
内容提要:文章介绍excel中VBA运行时错误9下标越界的原因及其解决方法。

Excel中vba提示下标超界,说明对象不存在或者数组元素不存在。

举个简单的例子:工作表中没有"1月"这个工作表,却用Sheets("1月");数组定义的是arr(1to10),却用Arr(11),都会出现下标越界的提示。

简单的理解:下标越界就是引用超出了所在的范围。

当我们在excel的VBA中输入下面代码,运行,就会出现“运行时错误9下标越界”的提示。代码如下:

Suba()
Dimarr()AsString
arr(1)="你好"
EndSub

其实上面的“运行时错误9下标越界”是因为定义的动态数组没有确定维数和尺寸。定义成固定维数和尺寸的,或用Redim界定一下维数和尺寸即可解决此问题。

改正后的代码如下:

Suba()
Dimarr()'定义一个动态数组
DimiAsInteger
ReDimarr(1To3)'定义一个3个元素的数组,并且对数组进行初始化
arr(1)=3
arr(2)=4
arr(3)=5
'在下面语句重新定义一个10个元素的数组,清除前面的元素,并重新分配新的存储变量
ReDimarr(1To10)
Fori=1To10
arr(i)=i
Nexti
EndSub

运行时错误9下标越界相关文章:http://www.ittribalwo.com/show.asp?id=1204

 
反对 0举报收藏 0打赏 0评论 0
更多>相关评论
暂时没有评论,来说点什么吧
更多>同类办公
推荐图文
推荐办公
点击排行