求教VBA中遍历数组的含义

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

Sub 遍历数组()

Dim TestArray(10) As Integer, I As Variant

For Each I In TestArray

TestArray(I) = I

I = I + 1

Next I

I = I + 1


我在excel运行了这个VBA，但什么事情都没有发生。。求教这到底是派什么用处的，TestArray(10)又是什么意思。。。多谢哈

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：VBA Integer varian array ESTAR excel

我不知道LZ程序的意图是干什么。是想给数组TestArray赋上0到10的值么？

“什么事情都没有发生”很正常，你连个输出语句都没有，怎么会看到结果呢。。。

Crsky7 发表于 2013-3-20 12:54
“什么事情都没有发生”很正常，你连个输出语句都没有，怎么会看到结果呢。。。

我在后面加了个
Range("A10") = I
但还是没有反应

大师，这段遍历数组的语句究竟有何意义呢

for each中的I只是临时变量，循环结束就没了，所以没结果。

VBA中for each是用来对区域中每个单元格进行操作的，无法对数组中每个元素进行操作。

Crsky7 发表于 2013-3-20 14:05
VBA中for each是用来对区域中每个单元格进行操作的，无法对数组中每个元素进行操作。

Dim TestArray(10) As Integer

这句有些什么含义么，百思不得其解

pickuprighthere 发表于 2013-3-20 15:12
Dim TestArray(10) As Integer

这句有些什么含义么，百思不得其解

定义一个数组TestArray，下标从0到10，仅此而已。

另外for each主要是用来遍历单元格的，遍历数组意义不大。