VBA遍历数组的2种方式

1.情景展示

VBA编程，如何对数组进行遍历？

2.解决方案

方式一：使用for循环

Sub 遍历数组1()
    '声明一个变量
    Dim Arr As Variant
    '声明一个数字变量
    Dim i As Integer
    '变量类型指定为数组并赋值
    Arr = Array(1, 2, 3, 4, 5)
    '使用For...To...进行遍历
    For i = 0 To UBound(Arr)
         Arr(i)
        '可以修改数组
        Arr(i) = Rnd
    Next i

End Sub

方式二： 使用foreach

Sub 遍历数组2()
    '声明一个变量
    Dim Arr As Variant
    '声明一个变量
    Dim i As Variant
    '变量类型指定为数组并赋值
    Arr = Array(1, 2, 3, 4, 5)
    '使用For Each...In...进行遍历
    For Each i In Arr
         i
    Next i
End Sub

 

写在最后

哪位大佬如若发现文章存在纰漏之处或需要补充更多内容，欢迎留言！！！

 相关推荐：

• 个人主页