网站首页网站地图google地图百度地图学习库RSS在线PSPS联盟素材下载  PS视频教程专题 PS爱好者教程网www.psahz.com PS教程自学网QQ群

Excel运行时出现错误“下标越界”的处理方法。

时间:2023-11-15 14:37 来源:IT部落窝 作者:IT部落窝 阅读:
Excel运行时出现错误“下标越界”的处理方法。Excel中vba提示下标超界,说明对象不存在或者数组元素不存在。

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

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

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

Sub a()
Dim arr() As String
arr(1) = "你好"
End Sub

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

Excel运行时出现错误“下标越界”的处理方法。

  改正后的代码如下:

Sub a()
Dim arr() '定义一个动态数组
Dim i As Integer
ReDim arr(1 To 3) '定义一个3个元素的数组,并且对数组进行初始化
arr(1) = 3
arr(2) = 4
arr(3) = 5
'在下面语句重新定义一个10个元素的数组,清除前面的元素,并重新分配新的存储变量
ReDim arr(1 To 10)
For i = 1 To 10
arr(i) = i
Next i
End Sub

    PS笔刷下载 PS滤镜下载 PS形状下载 PS样式下载 PS动作下载 PS图案下载
    相关教程