2010年5月24日月曜日

VBA配列の覚書

 配列の方向をなかなか覚えられないので覚書。

 まずは良い例。

Sub GoodExample()
    
    Dim x(2, 0)
    
    x(0, 0) = "a"
    x(1, 0) = "b"
    x(2, 0) = "c"
    
    Range("A1:A3") = x
    
End Sub
 実行するとA1:A3に'a','b','c'が出力される。

 次に悪い例。

Sub BadExample()
    
    Dim x(2, 0)
    
    x(0, 0) = "a"
    x(1, 0) = "b"
    x(2, 0) = "c"
    
    Range("A1:C1") = x    '←間違い!
    
End Sub

 実行するとA1:C1全てに'a'が出力されてしまう。

0 件のコメント:

コメントを投稿