数组定义的请教

天地一相

感谢帮助！详见代码。arr 对应区域单元格内都是整数，长整型。brr对应区域单元格内都是整数，10以内。请教如何正确定义这两个数组。我目前使用的是Dim arr,brr. 看有人说这样不准确，不写全就默认是变体（不懂啥意思），若是整数，应写全。我遐想若正确定义会不会跑的快呢？特此请教。

1. arr = Range("O5:O" & n)
   
2. For x = 1 To 10000
   
3.    Calculate
   
4.    brr = Range(Cells(5, 8), Cells(n, 8))
   
5.    For i = 1 To UBound(arr)
   
6.       arr(i, 1) = arr(i, 1) + brr(i, 1)
   
7.    Next i
   
8. Next x

复制代码

taller

无需考虑那么多，VBA是工具，能用就行

zh_xwyg

dim arr() as long ,brr() as Integer

zh_xwyg

dim arr() as long ,brr() as Integer

天地一相

taller 发表于 2023-7-9 13:16
无需考虑那么多，VBA是工具，能用就行

谢谢，想跑的更快一些。看帖子，说是正确定义数据能更快。

天地一相

zh_xwyg 发表于 2023-7-9 13:22
dim arr() as long ,brr() as Integer

谢谢，不对。你这个我发帖前就测试过的，类型不匹配

沈默00

我和你一样写的，没毛病呀，不行后面就redim一下

天地一相

沈默00 发表于 2023-7-9 13:58
我和你一样写的，没毛病呀，不行后面就redim一下

谢谢，我是不懂，只是照猫画虎那样写的。读贴看到说数组应该如何如何定义，就一下糊涂了，不知道我模仿的是不是最正确的写法，尝试修改，就报错，才发帖询问。我不需要Redim，我数组大小不会随着循环变化的。看学习贴，都说数据正确定义会提高速度的，我一直在想办法不断提高计算速度。

于箱长

你那个定义的Arr和Brr是数组，不需要考虑整型还是是长整型

micch

按你代码的写法，速度和变量类型无关，主要是循环操作单元格对象并且还自动计算影响速度。

绝大部分情况下，变量类型对你的程序的速度影响你可以忽略不计。

就问题来说，虽然你定义的是variant，不过在代码指定过程，会自动适应数据的类型，至于占用内存的那点区别，又不是搞算法，基础的应用而已，多半秒少半秒不影响。

一定要严格变量类型，你就需要循环读入数据到数组。