For内でのCollectionの初期化 - VBA

For内でCollectionを宣言・初期化するときには

Dim testList As New Collection

と1行で記述するのではなく、以下のように2行で記述すること

Dim testList As Collection
Set testList = New Collection

最初みたいに1行で記述したら、2ループ目以降で1ループ目の要素が入ったままになっていた