エクセルTips 配列を関数に渡す方法

配列を関数に渡す方法

関数の引数の宣言は、添字なしにします。

コード

Option Explicit

'配列は要素なしで宣言します。
Private Sub ExGetName(Ary)
    '配列内容の表示
    Range("B7") = Ary(0)
    Range("B8") = Ary(1)
    Range("B9") = Ary(2)
End Sub

Private Sub CommandButton1_Click()
    Dim list(2) As String

    '配列を初期化
    list(0) = "大学"
    list(1) = "専門学校"
    list(2) = "就職"
    '配列を渡す
    ExGetName list
End Sub

実行結果

	■配列の内容が、ExGetName関数内で表示されています。

Topへ