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)
        Debug.Print 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
        Debug.Print i
    Next i
End Sub

 

寫在最后

　　哪位大佬如若發現文章存在紕漏之處或需要補充更多內容，歡迎留言！！！

 相關推薦：

• 個人主頁