[已解决]vba运行错误'6'溢出

GYUHJ

Book3.rar (13.62 KB, 下载次数: 5)

2013-7-27 17:24 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

爱疯

2013-7-27 18:09

Dim arr, arr1, arr2(1 To 100), i&, j%, k As Byte, l As Byte, m As Byte, d As Object, c

改成

Dim arr, arr1, arr2(1 To 100), i&, j%, k As Byte, l As long, m As Byte, d As Object, c

跳转到最佳答案楼层

爱疯

Dim arr, arr1, arr2(1 To 100), i&, j%, k As Byte, l As Byte, m As Byte, d As Object, c

改成

Dim arr, arr1, arr2(1 To 100), i&, j%, k As Byte, l As long, m As Byte, d As Object, c