第111回.静的配列
マクロVBAを学習していくと必ず配列が出てきます。
VBA記述自体は簡単なものですが正しく理解せずに使っている場合も見受けられます。
ここでは、配列の概要から入り、VBAでの記述方法を解説していきます。
配列とは
集合住宅やアパートにたとえられますが、
要は、同じデータ型の変数の箱を複数つなげたものと理解すれば良いでしょう。
1つの箱には、1つの値しか入れられませんが、その箱が複数つながっていますので、
結果として、複数の値をいれられるのが配列という事になります。
通常の変数が、1つの変数に1つの値を格納している点で大きく異なっています。


配列のインデックス番号(配列内の位置)を指定することで個々の要素を参照することもできます。
これを、
Option Base 1
このように指定することでインデックスの最小値を0に変更可能ですが、
誤解の元になるので、あまり使用しない方が良いでしょう。
1から開始したい時は、配列宣言時に最小値に1を指定してください。
静的配列と動的配列
配列変数宣言時に要素数を指定します。
これを静的配列と呼びます。
対して、
マクロVBA実行時点で要素数を決める場合や、実行途中で要素数を増減させることもできます。
これを動的配列と呼びます。
むしろ動的配列を使用する機会の方が多いかもしれません。
配列の宣言
Dim MyArray(10) As Long
インデックスの最小値は、0になりますので、
上記の宣言で、11個要素を持つ、1次元の配列を定義したことになります。
(Option Base 1を指定していない場合です。)
MyArray(0) = 1
このように使用します。
以下の例では、配列に1から順に数値を入れています。
Sub sample()
Dim MyArray(10) As Long
Dim i As Long
For i = 0 To 10
MyArray(i) = i
Next i
End Sub
多次元配列
これは、2次元配列を宣言しています。
ワークシートの、11行、6列のセル範囲を想像してもらえればよいでしょう。
Sub sample()
Dim MyArray(10, 5) As Long
Dim i As Long, j As Long
For i = 0 To 10
For j = 0 To 5
MyArray(i, j) = Cells(i + 1, j + 1)
Next i
Next i
End Sub
上記では、セル範囲A1~F11を配列に入れています。
配列は0~開始され、Cellsは1から開始されるので、Cellsの方は+1しています。
通常は、2次元までにしましょう。
ワークシートが2次元なのですから。
それ以上の次元は、むやみに複雑化させるだけです。
要素の下限()の変更
Dim MyArray(1 To 10) As String
このように定義することで、配列の要素は、
1~10の10個になります。
特に、ワークシートとデータのやり取りをする場合は、
このようにした方が理解しやすく、また、記述もしやすいでしょう。
配列について
配列の使い方について
同じテーマ「マクロVBA入門」の記事
第104回.GetPhoneticメソッドとSetPhoneticメソッド(フリガナ)
第109回.列挙型(列挙体)Enum
第110回.ユーザー定義型・構造体(Type)
第111回.静的配列
第112回.動的配列(Redim)
第113回.配列に関連する関数
第114回.セル範囲⇔配列(マクロVBA高速化必須テクニック)
第115回.Split関数
第116回.ファイル操作Ⅱ(OpenとClose)
第117回.ファイル操作Ⅱ(Line Input #)
第118回.ファイル操作Ⅱ(Print #)
新着記事NEW ・・・新着記事一覧を見る
VBA100本ノック 100本目:WEBから100本ノックのリストを取得|VBA練習問題(3月3日)
VBA100本ノック 99本目:自動席替え(行列と前後左右が全て違うように)|VBA練習問題(3月2日)
VBA100本ノック 98本目:席替えルールが守られているか確認|VBA練習問題(3月1日)
VBA100本ノック 97本目:Accessデータを取得(グループ集計)|VBA練習問題(2月27日)
VBA100本ノック 96本目:Accessデータを取得(マスタ結合&抽出)|VBA練習問題(2月26日)
VBA100本ノック 95本目:図形のテキストを検索するフォーム作成|VBA練習問題(2月24日)
VBA100本ノック 94本目:表範囲からHTMLのtableタグを作成|VBA練習問題(2月23日)
VBA100本ノック 93本目:複数ブックを連結して再分割|VBA練習問題(2月22日)
VBA100本ノック 92本目:セルの色を16進で返す関数|VBA練習問題(2月20日)
VBA100本ノック 91本目:時間計算(残業時間の月間合計)|VBA練習問題(2月19日)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得(End,Rows.Count)|VBA入門
2.RangeとCellsの使い方|VBA入門
3.変数宣言のDimとデータ型|VBA入門
4.マクロって何?VBAって何?|VBA入門
5.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
7.繰り返し処理(For Next)|VBA入門
8.セルに文字を入れるとは(Range,Value)|VBA入門
9.マクロはどこに書くの(VBEの起動)|VBA入門
10.とにかく書いてみよう(Sub,End Sub)|VBA入門
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。