for eachを使った出力。

Sub 配列()
    
    Dim arry(5, 2) As Variant
    Dim val As Variant
    Dim gyou As Long
    Dim keta As Long

    Dim i As Integer
    Dim j As Integer
    
    arry(1, 1) = 100
    arry(1, 2) = "あいうえお"
    arry(2, 1) = 200
    arry(2, 2) = "かきくけこ"
    arry(3, 1) = 300
    arry(3, 2) = "さしすせそ"
    arry(4, 1) = 400
    arry(4, 2) = "たちつてと"
    arry(5, 1) = 500
    arry(5, 2) = "なにぬねの"
    
    For Each val In arry
        Debug.Print val
    Next
    
    gyou = UBound(arry, 1)
    keta = UBound(arry, 2)
    
    For i = 1 To gyou
        For j = 1 To keta
            Debug.Print arry(i, j)
        Next
    Next
    
End Sub
2次元の配列をeachを使って、出力しました。その結果は配列で言えば縦方向が

優先して出力する。終わったら次のカラムへ。普通に配列を考える場合は

横方向へ考えることが多いと思うので、2重のforで書いた方のイメージに近いと

思います。