コレクションとは、配列と同じく複数の値を格納できるオブジェクトです。配列と違う点は宣言時に要素数を指定しないことです。


Dim コレクション名 As Collection

Set コレクション名 = New Collection
					

コレクションに要素を値を追加する場合はAddメソッドを使用して追加します。


コレクション名.Add 値
					

格納したコレクションの値を全て取り出すにはVariant型の変数を宣言しFor〜Each文により取得します。


For Each 変数名 In コレクション名

	変数名

Next 変数名
					

以下の例ではコレクションに数値1〜10を格納しその全てを表示します。


Sub Sample

	Dim colData As Collection

	Set colData = New Collection

	Dim v As Variant
	Dim i As Integer

	For i=1 To 10

		colData.Add i

	Next

	For Each v In colData
	
		Msgbox v

	Next v

End Sub