Excel VBAで可変長リスト(Collection)を使用する

今開発しているシステムでExcel VBAで動く部分があり、
Excel VBAを初めて本格的にいじっている。

Excel VBAにもJavaやC#等のArrayListのような
可変長リストがないかと探してみたところ、
Collectionオブジェクトというのがそれに該当するようだ。

VBAで可変配列(Collectionオブジェクト)｜ソフトウエア開発部（システム開発・システム設計　株式会社アイロベックス｜東京都新宿区）

使用方法は以下のような感じ：
Dim sht As Worksheet Set sht = ThisWorkbook.Worksheets("Sheet1") ' 可変長リスト Dim list As Collection Set list = New Collection ' Sheet1シートの1行目に値が設定されている列分繰り返し Dim col As Integer col = 1 Do While sht.Cells(1, col) <> "" list.Add sht.Cells(1, col) col = col + 1 Loop Dim product_keys As String Dim request_keys As String Dim v As Variant ' 可変長リストlistを使用した処理 For Each v In list ' list中の1要素:vを使った処理 Next