Excel VBA 配列の中身を表示したい

・配列の中身をセルに表示してくれます。

・vOutArray(開始行, 開始列, 配列)
　開始位置から下に向かって表示していきます。

・hOutArray(開始行, 開始列, 配列)
　開始位置から右に向かって表示していきます。

-----------------------------------------------------------------------------------------

Sub vOutArray(ByRef row As Integer, ByRef col As Integer, ByRef data() As String)
    For i = 0 To UBound(data)
        Cells(row + i, col).Value = data(i)
    Next i
End Sub

Sub vOutArray(ByRef row As Integer, ByRef col As Integer, ByRef data() As String)
    For i = 0 To UBound(data)
        Cells(row, col + i).Value = data(i)
    Next i
End Sub

-----------------------------------------------------------------------------------------