VBA セルの値を一元配列に格納

セルの値を一元配列に格納

Sub test()
　'　セルの値を一元配列に格納

    
    Dim shiten(1 To 4) As String
    
    
    shiten(1) = Range("A1").Value
    shiten(2) = Range("A2").Value
    shiten(3) = Range("A3").Value
    shiten(4) = Range("A4").Value
    
    ' 　別セルに出力（一列縦で表示するならループなどが必要）
    Range("C1:F1").Value = shiten

End Sub

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

参考記事

『VBA　配列とは？』

『VBA 文字列を分割する（Split関数）』

『VBA 配列で文字列を結合する』

『VBA　配列で表の行列を入れ替える』

『VBA　一次元配列をセルに代入する』